From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Fri, 8 Feb 2002 02:57:30 +0000 (+0000)
Subject: More diagnostics from Nicholas Clark.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2d684b7a4761469da36a1269159635371b372f53;p=p5sagit%2Fp5-mst-13.2.git

More diagnostics from Nicholas Clark.

p4raw-id: //depot/perl@14592
---

diff --git a/lib/Benchmark.t b/lib/Benchmark.t
index dddce3d..5034633 100644
--- a/lib/Benchmark.t
+++ b/lib/Benchmark.t
@@ -280,7 +280,8 @@ sub check_graph_consistency {
     if ($slowrate < $fastrate) {
         pass ("slow rate is less than fast rate");
         ok ($slowfast < 0 && $slowfast > -100,
-            "slowfast should be less than zero, and > -100");
+            "slowfast should be less than zero, and > -100") ||
+          print STDERR "# slowfast $slowfast\n";
         ok ($fastslow > 0, "fastslow should be > 0") ||
           print STDERR "# fastslow $fastslow\n";
     } else {