diff options
| author | Jelmer Vernooij <jelmer@samba.org> | 2007-12-20 15:54:08 +0100 |
|---|---|---|
| committer | Stefan Metzmacher <metze@samba.org> | 2007-12-21 06:28:48 +0100 |
| commit | 1ae762d3bc924245aa96378929a9a048d385a61e (patch) | |
| tree | c8973260f819b45c3a6f65e18eec15350d5977f9 /source4/selftest/output/buildfarm.pm | |
| parent | 70c9374305fdb39ca92b3490bfdbc23043960637 (diff) | |
| download | samba-1ae762d3bc924245aa96378929a9a048d385a61e.tar.gz samba-1ae762d3bc924245aa96378929a9a048d385a61e.tar.bz2 samba-1ae762d3bc924245aa96378929a9a048d385a61e.zip | |
r26549: Remove suite-specific bits.
(This used to be commit ac01d515b71ce44a0d98e50d58a76e1ce9e1f5d9)
Diffstat (limited to 'source4/selftest/output/buildfarm.pm')
| -rw-r--r-- | source4/selftest/output/buildfarm.pm | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/source4/selftest/output/buildfarm.pm b/source4/selftest/output/buildfarm.pm index 81ffd5012c..af61376446 100644 --- a/source4/selftest/output/buildfarm.pm +++ b/source4/selftest/output/buildfarm.pm @@ -7,11 +7,11 @@ use Exporter; use strict; -sub new($$$$) { - my ($class, $statistics) = @_; +sub new($$$) { + my ($class) = @_; my $self = { - statistics => $statistics, - test_output => {} + test_output => {}, + start_time => time() }; bless($self, $class); } @@ -24,7 +24,7 @@ sub start_testsuite($$$) $state->{NAME} = $name; $state->{START_TIME} = time(); - my $duration = $state->{START_TIME} - $self->{statistics}->{START_TIME}; + my $duration = $state->{START_TIME} - $self->{start_time}; $out .= "--==--==--==--==--==--==--==--==--==--==--\n"; $out .= "Running test $name (level 0 stdout)\n"; $out .= "--==--==--==--==--==--==--==--==--==--==--\n"; @@ -103,6 +103,8 @@ sub end_test($$$$$$) sub summary($) { my ($self) = @_; + + print "DURATION: " . (time() - $self->{start_time}) . " seconds\n"; } sub skip_testsuite($$$$) |