Provided by: libcps-perl_0.18-1_all
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>