summaryrefslogtreecommitdiff
path: root/source4/selftest/output/buildfarm.pm
diff options
context:
space:
mode:
authorStefan Metzmacher <metze@samba.org>2007-09-29 08:57:02 +0000
committerGerald (Jerry) Carter <jerry@samba.org>2007-10-10 15:07:30 -0500
commit59f43d2b58271c4beeab14104014dcd1ae059997 (patch)
tree80c0a6998d723a8c5de775fe9549e3cdea7a0dfe /source4/selftest/output/buildfarm.pm
parent91a0879b1f317bf3f64867cd4f9494afab30ca2d (diff)
downloadsamba-59f43d2b58271c4beeab14104014dcd1ae059997.tar.gz
samba-59f43d2b58271c4beeab14104014dcd1ae059997.tar.bz2
samba-59f43d2b58271c4beeab14104014dcd1ae059997.zip
r25427: fix SELFTEST RUNTIME calculation for the build-farm
metze (This used to be commit 554d56aa16c147bbb383e4a40d7fc11fa405a3a8)
Diffstat (limited to 'source4/selftest/output/buildfarm.pm')
-rw-r--r--source4/selftest/output/buildfarm.pm9
1 files changed, 5 insertions, 4 deletions
diff --git a/source4/selftest/output/buildfarm.pm b/source4/selftest/output/buildfarm.pm
index 953f009c7d..cf30bce6c8 100644
--- a/source4/selftest/output/buildfarm.pm
+++ b/source4/selftest/output/buildfarm.pm
@@ -7,10 +7,10 @@ use Exporter;
use strict;
-sub new($$) {
- my ($class) = @_;
+sub new($$$$) {
+ my ($class, $verbose, $immediate, $statistics) = @_;
my $self = {
- start => time(),
+ statistics => $statistics,
test_output => {}
};
bless($self, $class);
@@ -21,11 +21,12 @@ sub start_testsuite($$)
my ($self, $state) = @_;
my $out = "";
+ my $duration = $state->{START_TIME} - $self->{statistics}->{START_TIME};
$out .= "--==--==--==--==--==--==--==--==--==--==--\n";
$out .= "Running test $state->{NAME} (level 0 stdout)\n";
$out .= "--==--==--==--==--==--==--==--==--==--==--\n";
$out .= scalar(localtime())."\n";
- $out .= "SELFTEST RUNTIME: " . ($state->{START_TIME} - $self->{START_TIME}) . "s\n";
+ $out .= "SELFTEST RUNTIME: " . $duration . "s\n";
$out .= "NAME: $state->{NAME}\n";
$out .= "CMD: $state->{CMD}\n";