diff options
author | njn <njn@a5019735-40e9-0310-863c-91ae7b9d1cf9> | 2005-12-13 20:23:38 +0000 |
---|---|---|
committer | njn <njn@a5019735-40e9-0310-863c-91ae7b9d1cf9> | 2005-12-13 20:23:38 +0000 |
commit | 02383bcb3a0767d5f5825f94e43f0980151f54ca (patch) | |
tree | b3a14f7a677ad41f835507e313a274251c717d46 /perf | |
parent | 5096a39f831d8f7d9dbdfb43e0de0d8b13d4d950 (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.in | 10 |
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:"); |