Telling how many tests we are expecting helps.
authorJarkko Hietaniemi <jhi@iki.fi>
Mon, 10 Dec 2001 01:01:24 +0000 (01:01 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Mon, 10 Dec 2001 01:01:24 +0000 (01:01 +0000)
p4raw-id: //depot/perl@13578

ext/POSIX/t/waitpid.t

index 1263673..f2e9c06 100644 (file)
@@ -14,7 +14,7 @@ BEGIN {
        print "1..0 # no POSIX sys_wait_h\n";
        exit 0;
     }
-    eval { use Time::HiRes };
+    eval { use Time::HiRes qw(time) };
     if ($@) {
        print "1..0 # no Time::HiRes\n";
        exit 0;
@@ -24,10 +24,10 @@ BEGIN {
 use warnings;
 use strict;
 
-use Time::HiRes qw(time);
-
 $| = 1;
 
+print "1..1\n";
+
 sub NEG1_PROHIBITED () { 0x01 }
 sub NEG1_REQUIRED   () { 0x02 }