--- AnyEvent/t/63_eventlib_03_child.t 2009/07/08 05:30:55 1.1 +++ AnyEvent/t/63_eventlib_03_child.t 2009/07/18 00:05:29 1.4 @@ -1,3 +1,8 @@ +use POSIX (); + +use AnyEvent; +BEGIN { eval q{use AnyEvent::Impl::EventLib;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::EventLib not found}), exit 0) } + BEGIN { # check for broken perls if ($^O =~ /mswin32/i) { @@ -14,15 +19,9 @@ } } -BEGIN { - $|=1; - print "1..7\n" -} - -use POSIX (); +$| = 1; print "1..7\n"; -use AnyEvent; -use AnyEvent::Impl::EventLib; +$AnyEvent::MAX_SIGNAL_LATENCY = 1; print "ok 1\n";