summaryrefslogtreecommitdiff
path: root/selftest/Subunit.pm
diff options
context:
space:
mode:
authorJelmer Vernooij <jelmer@samba.org>2009-06-05 16:55:45 +0200
committerJelmer Vernooij <jelmer@samba.org>2009-06-11 19:59:59 +0200
commitd8a77a798b5c691c76fcbadbc41c97ff1c9922f3 (patch)
tree949e80dade2618002b36173be2082c833ce3909b /selftest/Subunit.pm
parent2e311fdac56f43998bb192418f617e6e7a6fc320 (diff)
downloadsamba-d8a77a798b5c691c76fcbadbc41c97ff1c9922f3.tar.gz
samba-d8a77a798b5c691c76fcbadbc41c97ff1c9922f3.tar.bz2
samba-d8a77a798b5c691c76fcbadbc41c97ff1c9922f3.zip
selftest: Properly recognize xfail testsuites.
Diffstat (limited to 'selftest/Subunit.pm')
-rw-r--r--selftest/Subunit.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/selftest/Subunit.pm b/selftest/Subunit.pm
index 16aab73926..bb23483d12 100644
--- a/selftest/Subunit.pm
+++ b/selftest/Subunit.pm
@@ -39,7 +39,7 @@ sub parse_results($$$)
push (@$open_tests, $1);
} elsif (/^time: (\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)Z\n/) {
$msg_ops->report_time(mktime($6, $5, $4, $3, $2, $1-1900));
- } elsif (/^(success|successful|failure|fail|skip|knownfail|error|xfail|skip-testsuite|testsuite-failure|testsuite-success|testsuite-error): (.*?)( \[)?([ \t]*)\n/) {
+ } elsif (/^(success|successful|failure|fail|skip|knownfail|error|xfail|skip-testsuite|testsuite-failure|testsuite-xfail|testsuite-success|testsuite-error): (.*?)( \[)?([ \t]*)\n/) {
$msg_ops->control_msg($_);
my $result = $1;
my $testname = $2;
@@ -91,6 +91,8 @@ sub parse_results($$$)
$msg_ops->end_testsuite($testname, "success", $reason);
} elsif ($result eq "testsuite-failure") {
$msg_ops->end_testsuite($testname, "failure", $reason);
+ } elsif ($result eq "testsuite-xfail") {
+ $msg_ops->end_testsuite($testname, "xfail", $reason);
} elsif ($result eq "testsuite-error") {
$msg_ops->end_testsuite($testname, "error", $reason);
}