diff options
| author | John Peacock <jpeacock@rowman.com> | 2001-05-11 10:09:41 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-16 12:37:57 +0000 |
| commit | 6119b5d3eb13acf0c1d8ca5a1242fa7a3750a4cf (patch) | |
| tree | 0ef0bf0d846a4afde0013c6789bc69dd8a316a18 /t | |
| parent | bf91b999b25fa75a3ef7a327742929592a2e7e9c (diff) | |
| download | perl-6119b5d3eb13acf0c1d8ca5a1242fa7a3750a4cf.tar.gz | |
perl-current/t/time-hires.t
Message-ID: <3AFC2AE5.5E787E54@rowman.com>
p4raw-id: //depot/perl@10118
Diffstat (limited to 't')
| -rw-r--r-- | t/lib/time-hires.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/lib/time-hires.t b/t/lib/time-hires.t index cc741e7669..db35b955a5 100644 --- a/t/lib/time-hires.t +++ b/t/lib/time-hires.t @@ -132,7 +132,7 @@ else { { my $t = time(); my $tf = Time::HiRes::time(); - ok 14, ($tf >= $t) && (($tf - $t) <= 1), + ok 14, (abs($tf - $t) <= 1), "time $t differs from Time::HiRes::time $tf"; } |