--- cvsroot/Coro/Coro.pm 2001/07/21 18:21:45 1.20 +++ cvsroot/Coro/Coro.pm 2001/07/22 03:24:10 1.21 @@ -30,6 +30,12 @@ own set of lexicals and it's own set of perl's most important global variables. +WARNING: When using this module, make sure that, at program end, no +coroutines are still running OR just call exit before falling off the +end. The reason for this is that some coroutine of yours might have called +into a C function, and falling off the end of main:: results in returning +to that C function instead if to the main C interpreter. + =cut package Coro; @@ -176,6 +182,7 @@ sub terminate { $current->{_results} = [@_]; + delete $current->{_coro_state}; &schedule; }