diff options
| author | Steve Hay <SteveHay@planit.com> | 2003-08-08 13:42:28 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-08 13:12:19 +0000 |
| commit | ab2f3c4a71e82c5e73898a746d576abd20c32de8 (patch) | |
| tree | c56a35fca7c11d561ed82ca763b400202fc0fc55 | |
| parent | 0016644b4ef8e92272036e52ec534c50ed8924c6 (diff) | |
| download | perl-ab2f3c4a71e82c5e73898a746d576abd20c32de8.tar.gz | |
Re: main@20537: WinXP build failed op/time.t test 2
Message-ID: <3F338CA4.3010503@uk.radan.com>
p4raw-id: //depot/perl@20564
| -rwxr-xr-x | t/op/time.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/time.t b/t/op/time.t index 870a8dcf03..2de3a03372 100755 --- a/t/op/time.t +++ b/t/op/time.t @@ -34,7 +34,7 @@ ok($now > $beg && $now - $beg < 10, 'very basic time test'); for ($i = 0; $i < 100000; $i++) { ($nowuser, $nowsys) = times; - $i = 200000 if $nowuser > $beguser && ( $nowsys > $begsys || + $i = 200000 if $nowuser > $beguser && ( $nowsys >= $begsys || (!$nowsys && !$begsys)); last if time - $beg > 20; } |