--- IO-AIO/t/04_fork.t 2005/08/16 22:22:18 1.1 +++ IO-AIO/t/04_fork.t 2005/08/17 05:06:59 1.2 @@ -5,33 +5,29 @@ # this is a lame test, but.... -BEGIN { plan tests => 9 } +BEGIN { plan tests => 8 } IO::AIO::min_parallel 2; print "ok 1\n"; -aio_stat "/", sub { - print "ok 2\n"; # pre-fork -}; - if (open FH, "-|") { print while ; aio_stat "/", sub { - print "ok 7\n"; + print "ok 6\n"; }; - print "ok 6\n"; + print "ok 5\n"; IO::AIO::poll; - print "ok 8\n"; + print "ok 7\n"; } else { - print "ok 3\n"; + print "ok 2\n"; aio_stat "/", sub { - print "ok 4\n"; + print "ok 3\n"; }; IO::AIO::poll; - print "ok 5\n"; + print "ok 4\n"; exit; } -print "ok 9\n"; +print "ok 8\n";