--- IO-AIO/t/04_fork.t	2005/08/16 22:22:18	1.1
+++ IO-AIO/t/04_fork.t	2011/02/15 03:15:16	1.5
@@ -5,33 +5,38 @@
 
 # this is a lame test, but....
 
-BEGIN { plan tests => 9 }
+BEGIN { plan tests => 10 }
 
 IO::AIO::min_parallel 2;
 
-print "ok 1\n";
+IO::AIO::aio_nop sub {
+   print "ok 6\n";
+};
+
+IO::AIO::aio_busy 0.2, sub {
+   print "ok 8\n";
 
-aio_stat "/", sub {
-   print "ok 2\n"; # pre-fork
 };
 
+print "ok 1\n";
+
 if (open FH, "-|") {
    print while <FH>;
    aio_stat "/", sub {
       print "ok 7\n";
    };
-   print "ok 6\n";
-   IO::AIO::poll;
-   print "ok 8\n";
+   print "ok 5\n";
+   IO::AIO::poll while IO::AIO::nreqs;
+   print "ok 9\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";
+   IO::AIO::poll while IO::AIO::nreqs;
+   print "ok 4\n";
    exit;
 }
 
-print "ok 9\n";
+print "ok 10\n";