diff options
author | David Mitchell <davem@iabyn.com> | 2013-03-01 16:31:06 +0000 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2013-03-01 16:34:53 +0000 |
commit | a2656c4ab81b216a427d1e0db6a3aa25b4350ba8 (patch) | |
tree | 53f3c48766b40038fd2323aa3eebf388d2481cbd /lib/Benchmark.pm | |
parent | d04589db35f09d1a2397c7ca43216163acba7a2d (diff) | |
download | perl-a2656c4ab81b216a427d1e0db6a3aa25b4350ba8.tar.gz |
revert: Benchmark iteration warnings should warn
This commit reverts:
commit a820780c62918236069b3b55502640c99a9e812a
Author: David Golden <dagolden@cpan.org>
AuthorDate: Tue Feb 5 22:23:37 2013 -0500
Commit: David Golden <dagolden@cpan.org>
CommitDate: Tue Feb 5 22:49:36 2013 -0500
Benchmark iteration warnings should warn, not print
because the warnings appearing on STDERR weren't being trapped by
Benchmark.t (see [perl #116831]). Revert for now, and re-address after
5.18.
Diffstat (limited to 'lib/Benchmark.pm')
-rw-r--r-- | lib/Benchmark.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Benchmark.pm b/lib/Benchmark.pm index 728b0b9e74..1fa187ee1d 100644 --- a/lib/Benchmark.pm +++ b/lib/Benchmark.pm @@ -440,7 +440,7 @@ our(@ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS, $VERSION); clearcache clearallcache disablecache enablecache); %EXPORT_TAGS=( all => [ @EXPORT, @EXPORT_OK ] ) ; -$VERSION = 1.14; +$VERSION = 1.15; # --- ':hireswallclock' special handling @@ -836,7 +836,7 @@ sub timethis{ # A conservative warning to spot very silly tests. # Don't assume that your benchmark is ok simply because # you don't get this warning! - warn " (warning: too few iterations for a reliable count)\n" + print " (warning: too few iterations for a reliable count)\n" if $n < $Min_Count || ($t->real < 1 && $n < 1000) || $t->cpu_a < $Min_CPU; |