--- Coro/Coro.pm 2008/11/24 07:55:28 1.239 +++ Coro/Coro.pm 2008/12/04 04:31:41 1.241 @@ -76,7 +76,7 @@ our $main; # main coroutine our $current; # current coroutine -our $VERSION = 5.1; +our $VERSION = 5.11; our @EXPORT = qw(async async_pool cede schedule terminate current unblock_sub); our %EXPORT_TAGS = ( @@ -177,7 +177,7 @@ =item async { ... } [@args...] -Create a new coroutine and return it's coroutine object (usually +Create a new coroutine and return its coroutine object (usually unused). The coroutine will be put into the ready queue, so it will start running automatically on the next scheduler run. @@ -354,7 +354,7 @@ =cut -sub _terminate { +sub _coro_run { terminate &{+shift}; } @@ -683,7 +683,7 @@ C and C. The first function, C, generates and returns a callback that, -when invoked, will save it's arguments and notify the coroutine that +when invoked, will save its arguments and notify the coroutine that created the callback. The second function, C, waits for the callback to be called