diff options
| author | Jelmer Vernooij <jelmer@samba.org> | 2009-06-04 13:49:11 +0200 |
|---|---|---|
| committer | Jelmer Vernooij <jelmer@samba.org> | 2009-06-11 19:59:58 +0200 |
| commit | 16a69f358a38c60577e25bc0811a220f8e71d2cd (patch) | |
| tree | 8986f5b24d4a29701d88d5ef1932c9b025cf8954 /selftest/output/buildfarm.pm | |
| parent | 9bdf76c9c214d6f12c379f8feefe120fdae84377 (diff) | |
| download | samba-16a69f358a38c60577e25bc0811a220f8e71d2cd.tar.gz samba-16a69f358a38c60577e25bc0811a220f8e71d2cd.tar.bz2 samba-16a69f358a38c60577e25bc0811a220f8e71d2cd.zip | |
selftest: Use external processes for filtering known failures and pretty
formatting.
Diffstat (limited to 'selftest/output/buildfarm.pm')
| -rw-r--r-- | selftest/output/buildfarm.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/selftest/output/buildfarm.pm b/selftest/output/buildfarm.pm index f4daf69010..701444359b 100644 --- a/selftest/output/buildfarm.pm +++ b/selftest/output/buildfarm.pm @@ -29,9 +29,10 @@ use BuildFarm; use strict; sub new($$$) { - my ($class) = @_; + my ($class, $statistics) = @_; my $self = { test_output => {}, + statistics => $statistics, last_time => 0, start_time => undef, }; @@ -111,6 +112,8 @@ sub summary($) my ($self) = @_; BuildFarm::summary($self->{last_time} - $self->{start_time}); + + print "TEST STATUS: $self->{statistics}->{SUITES_FAIL}\n"; } sub skip_testsuite($$$) |