--- AnyEvent/t/66_ioasync_01_basic.t 2009/06/25 11:16:08 1.1 +++ AnyEvent/t/66_ioasync_01_basic.t 2011/07/04 21:14:28 1.7 @@ -1,9 +1,8 @@ -$|=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";