ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/cvsroot/Coro/Coro.pm
(Generate patch)

Comparing cvsroot/Coro/Coro.pm (file contents):
Revision 1.270 by root, Thu Oct 1 23:50:23 2009 UTC vs.
Revision 1.272 by root, Tue Nov 24 06:13:01 2009 UTC

… …
81 81
82our $idle; # idle handler 82our $idle; # idle handler
83our $main; # main coro 83our $main; # main coro
84our $current; # current coro 84our $current; # current coro
85 85
86our $VERSION = 5.17; 86our $VERSION = 5.2;
87 87
88our @EXPORT = qw(async async_pool cede schedule terminate current unblock_sub); 88our @EXPORT = qw(async async_pool cede schedule terminate current unblock_sub rouse_cb rouse_wait);
89our %EXPORT_TAGS = ( 89our %EXPORT_TAGS = (
90 prio => [qw(PRIO_MAX PRIO_HIGH PRIO_NORMAL PRIO_LOW PRIO_IDLE PRIO_MIN)], 90 prio => [qw(PRIO_MAX PRIO_HIGH PRIO_NORMAL PRIO_LOW PRIO_IDLE PRIO_MIN)],
91); 91);
92our @EXPORT_OK = (@{$EXPORT_TAGS{prio}}, qw(nready)); 92our @EXPORT_OK = (@{$EXPORT_TAGS{prio}}, qw(nready));
93 93
… …
715 unshift @unblock_queue, [$cb, @_]; 715 unshift @unblock_queue, [$cb, @_];
716 $unblock_scheduler->ready; 716 $unblock_scheduler->ready;
717 } 717 }
718} 718}
719 719
720=item $cb = Coro::rouse_cb 720=item $cb = rouse_cb
721 721
722Create and return a "rouse callback". That's a code reference that, 722Create and return a "rouse callback". That's a code reference that,
723when called, will remember a copy of its arguments and notify the owner 723when called, will remember a copy of its arguments and notify the owner
724coro of the callback. 724coro of the callback.
725 725
726See the next function. 726See the next function.
727 727
728=item @args = Coro::rouse_wait [$cb] 728=item @args = rouse_wait [$cb]
729 729
730Wait for the specified rouse callback (or the last one that was created in 730Wait for the specified rouse callback (or the last one that was created in
731this coro). 731this coro).
732 732
733As soon as the callback is invoked (or when the callback was invoked 733As soon as the callback is invoked (or when the callback was invoked
… …
830the windows process emulation enabled under unix roughly halves perl 830the windows process emulation enabled under unix roughly halves perl
831performance, even when not used. 831performance, even when not used.
832 832
833=item coro switching is not signal safe 833=item coro switching is not signal safe
834 834
835You must not switch to another coro from within a signal handler 835You must not switch to another coro from within a signal handler (only
836(only relevant with %SIG - most event libraries provide safe signals). 836relevant with %SIG - most event libraries provide safe signals), I<unless>
837you are sure you are not interrupting a Coro function.
837 838
838That means you I<MUST NOT> call any function that might "block" the 839That means you I<MUST NOT> call any function that might "block" the
839current coro - C<cede>, C<schedule> C<< Coro::Semaphore->down >> or 840current coro - C<cede>, C<schedule> C<< Coro::Semaphore->down >> or
840anything that calls those. Everything else, including calling C<ready>, 841anything that calls those. Everything else, including calling C<ready>,
841works. 842works.

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines