Paul Evans > CPS-0.18 > CPS::Governor::Simple

Download:
CPS-0.18.tar.gz

Dependencies

Annotate this POD

CPAN RT

Open  0
View/Report Bugs
Module Version: 0.18   Source  

NAME ^

CPS::Governor::Simple - iterate immediately as fast as possible

SYNOPSIS ^

 use CPS qw( gkforeach );
 use CPS::Governor::Simple;

 my $gov = CPS::Governor::Simple->new;

 gkforeach( $gov, [ 1 .. 10 ],
    sub { 
       my ( $item, $knext ) = @_;

       print "$item\n";
       goto &$knext;
    },
    sub {},
 );

DESCRIPTION ^

This CPS::Governor allows the functions using it to run as fast as possible. It invokes its continuations immediately using a tailcall, so as not to let the stack grow arbitrarily.

Its constructor takes no special arguments, and it provides no other methods beyond those of CPS::Governor.

AUTHOR ^

Paul Evans <leonerd@leonerd.org.uk>

syntax highlighting: