From: Todd Rinaldo <toddr@cpan.org>
Date: Fri, 13 May 2011 05:39:22 +0000 (-0700)
Subject: RT72688 - Benchmark.t test 24 bug when the testing system is under load.
X-Git-Tag: accepted/trunk/20130322.191538~4219
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=bd9f0ebfcceb3f4cd93610fee8a3982e77d70277;p=platform%2Fupstream%2Fperl.git

RT72688 - Benchmark.t test 24 bug when the testing system is under load.
---

diff --git a/lib/Benchmark.t b/lib/Benchmark.t
index c29ed1a..e54d829 100644
--- a/lib/Benchmark.t
+++ b/lib/Benchmark.t
@@ -122,7 +122,7 @@ is ($auto, $default, 'timestr ($diff, "auto") matches timestr ($diff)');
     is (timestr ($diff, 'none'), '', "none suppresses output");
 
     my $noc = timestr ($diff, 'noc');
-    like ($noc, qr/$wallclock +wallclock secs? +\( *$usr +usr +\+ +$sys +sys += +$cpu +CPU\)/, 'timestr ($diff, "noc")');
+    like ($noc, qr/$wallclock +wallclock secs? +\( *$usr +usr +\+ +$sys +sys += +\d+\.\d\d +CPU\)/, 'timestr ($diff, "noc")');
 
     my $nop = timestr ($diff, 'nop');
     like ($nop, qr/$wallclock +wallclock secs? +\( *$cusr +cusr +\+ +$csys +csys += +\d+\.\d\d +CPU\)/, 'timestr ($diff, "nop")');