sin/samba-mirror
1
0
Fork 0
mirror of https://github.com/samba-team/samba.git synced 2025-03-27 22:50:26 +03:00
Code

subunit.pm: Remove output_msg/control_msg functions.

Browse Source
This commit is contained in:
Jelmer Vernooij 2010-09-14 00:09:46 +02:00
parent 7d4968e161
commit c0923cfac1
2 changed files with 1 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
selftest/Subunit.pm
View File

@ -31,11 +31,9 @@ sub parse_results($$)
while(<$fh>) {
if (/^test: (.+)\n/) {
$msg_ops->control_msg($_);
$msg_ops->start_test($1);
push (@$open_tests, $1);
} elsif (/^(success|successful|failure|fail|skip|knownfail|error|xfail): (.*?)( \[)?([ \t]*)( multipart)?\n/) {
$msg_ops->control_msg($_);
my $result = $1;
my $testname = $2;
my $reason = undef;
@ -44,7 +42,6 @@ sub parse_results($$)
# reason may be specified in next lines
my $terminated = 0;
while(<$fh>) {
$msg_ops->control_msg($_);
if ($_ eq "]\n") { $terminated = 1; last; } else { $reason .= $_; }
}
@ -76,7 +73,7 @@ sub parse_results($$)
$msg_ops->end_test($testname, "error", $reason);
}
} else {
$msg_ops->output_msg($_);
print $_;
}
}

11
selftest/Subunit/Filter.pm
View File

@ -7,17 +7,6 @@ package Subunit::Filter;
use strict;
sub control_msg()
{
# We regenerate control messages, so ignore this
}
sub output_msg($$)
{
my ($self, $msg) = @_;
print $msg;
}
sub start_test($$)
{
my ($self, $testname) = @_;