summaryrefslogtreecommitdiff
path: root/lib/Benchmark.pm
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2013-03-01 16:31:06 +0000
committerDavid Mitchell <davem@iabyn.com>2013-03-01 16:34:53 +0000
commita2656c4ab81b216a427d1e0db6a3aa25b4350ba8 (patch)
tree53f3c48766b40038fd2323aa3eebf388d2481cbd /lib/Benchmark.pm
parentd04589db35f09d1a2397c7ca43216163acba7a2d (diff)
downloadperl-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.pm4
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;