--- AnyEvent/t/66_ioasync_01_basic.t 2009/06/25 11:16:08 1.1 +++ AnyEvent/t/66_ioasync_01_basic.t 2010/12/29 04:23:06 1.6 @@ -1,9 +1,7 @@ -$|=1; -BEGIN { print "1..6\n" } - use AnyEvent; -use AnyEvent::Impl::IOAsync; -use IO::Async::Loop; AnyEvent::Impl::IOAsync::set_loop new IO::Async::Loop; +BEGIN { eval q{use AnyEvent::Impl::IOAsync;1} or ((print qq{1..0 # SKIP AnyEvent::Impl::IOAsync not loadable}), exit 0) } + +$| = 1; print "1..6\n"; print "ok 1\n";