--- AnyEvent/t/02_signals.t 2006/12/10 23:59:15 1.1 +++ AnyEvent/t/02_signals.t 2007/11/16 05:08:18 1.3 @@ -1,7 +1,8 @@ $|=1; -BEGIN { print "1..5\n" } +BEGIN { print "1..6\n" } use AnyEvent; +use AnyEvent::Impl::Perl; print "ok 1\n"; @@ -16,10 +17,12 @@ kill 'CHLD', 0; $cv->wait; +print "ok 4\n"; + undef $sw; -print "ok 4\n"; +print "ok 5\n"; kill 'CHLD', 0; -print "ok 5\n"; +print "ok 6\n";