diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-10 01:01:24 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-12-10 01:01:24 +0000 |
| commit | fd781486aade56259bc3516488577dcd5b758b97 (patch) | |
| tree | 4ac5912278f4dae8ca5eaf1d10bdf748b7e5154f /ext/POSIX | |
| parent | 9b58c5a10e4cf4eeb9f5c1e9aa8c8a95fb688fbc (diff) | |
| download | perl-fd781486aade56259bc3516488577dcd5b758b97.tar.gz | |
Telling how many tests we are expecting helps.
p4raw-id: //depot/perl@13578
Diffstat (limited to 'ext/POSIX')
| -rw-r--r-- | ext/POSIX/t/waitpid.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ext/POSIX/t/waitpid.t b/ext/POSIX/t/waitpid.t index 1263673bd3..f2e9c06bf3 100644 --- a/ext/POSIX/t/waitpid.t +++ b/ext/POSIX/t/waitpid.t @@ -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 } |