From: Jarkko Hietaniemi Date: Sat, 12 Apr 2003 16:51:12 +0000 (+0000) Subject: Benchmark nit from Nicholas Clark (in OpenBSD the result could X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=07e88136df3f15fa54f4d0a34b2950986fc40777;p=p5sagit%2Fp5-mst-13.2.git Benchmark nit from Nicholas Clark (in OpenBSD the result could be a negative zero, -0). p4raw-id: //depot/perl@19191 --- diff --git a/lib/Benchmark.t b/lib/Benchmark.t index 60caf43..d9cb156 100644 --- a/lib/Benchmark.t +++ b/lib/Benchmark.t @@ -292,8 +292,8 @@ sub check_graph_consistency { (my $fastslow = $fastslowt) =~ s!%!!; if ($slowrate < $fastrate) { pass ("slow rate is less than fast rate"); - unless (ok ($slowfast < 0 && $slowfast >= -100, - "slowfast should be less than zero, and >= -100")) { + unless (ok ($slowfast <= 0 && $slowfast >= -100, + "slowfast should be less than or equal to zero, and >= -100")) { print STDERR "# slowfast $slowfast\n"; $all_passed = 0; }