--- Coro/Coro.pm 2006/12/03 22:50:06 1.95 +++ Coro/Coro.pm 2006/12/04 03:48:16 1.96 @@ -130,8 +130,8 @@ =cut $idle = sub { - print STDERR "FATAL: deadlock detected\n"; - exit (51); + require Carp; + Carp::croak ("FATAL: deadlock detected"); }; # this coroutine is necessary because a coroutine