summaryrefslogtreecommitdiff
path: root/perf
diff options
context:
space:
mode:
authornjn <njn@a5019735-40e9-0310-863c-91ae7b9d1cf9>2005-12-13 20:23:38 +0000
committernjn <njn@a5019735-40e9-0310-863c-91ae7b9d1cf9>2005-12-13 20:23:38 +0000
commit02383bcb3a0767d5f5825f94e43f0980151f54ca (patch)
treeb3a14f7a677ad41f835507e313a274251c717d46 /perf
parent5096a39f831d8f7d9dbdfb43e0de0d8b13d4d950 (diff)
Use user time instead of wall-clock time.
git-svn-id: svn://svn.valgrind.org/valgrind/trunk@5332 a5019735-40e9-0310-863c-91ae7b9d1cf9
Diffstat (limited to 'perf')
-rw-r--r--perf/vg_perf.in10
1 files changed, 5 insertions, 5 deletions
diff --git a/perf/vg_perf.in b/perf/vg_perf.in
index e0719eef..d19822cc 100644
--- a/perf/vg_perf.in
+++ b/perf/vg_perf.in
@@ -225,7 +225,7 @@ sub mysystem($)
}
}
-# Run program N times, return the best wall-clock time.
+# Run program N times, return the best user time.
sub time_prog($$)
{
my ($cmd, $n) = @_;
@@ -234,11 +234,11 @@ sub time_prog($$)
mysystem("echo '$cmd' > perf.cmd");
my $retval = mysystem("$cmd > perf.stdout 2> perf.stderr");
(0 == $retval) or
- die "\n*** Command returned non-zero: $cmd\n"
+ die "\n*** Command returned non-zero: $cmd"
. "\n*** See perf.{cmd,stdout,stderr} to diagnose what went wrong.\n";
my $out = `cat perf.stderr`;
- ($out =~ /walltime: ([\d\.]+)s/) or
- die "\n*** missing walltime in perf.stderr\n";
+ ($out =~ /usertime: ([\d\.]+)s/) or
+ die "\n*** missing usertime in perf.stderr\n";
$tmin = $1 if ($1 < $tmin);
}
return $tmin;
@@ -261,7 +261,7 @@ sub do_one_test($$)
printf("%-12s", "$name:");
- my $timecmd = "/usr/bin/time -f 'walltime: %es'";
+ my $timecmd = "/usr/bin/time -f 'usertime: %Us'";
# Do the native run(s).
printf("nt:");