p4raw-id: //depot/perl@13578
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;
use warnings;
use strict;
-use Time::HiRes qw(time);
-
$| = 1;
+print "1..1\n";
+
sub NEG1_PROHIBITED () { 0x01 }
sub NEG1_REQUIRED () { 0x02 }