runtests: limit execessive logging/output

This commit is contained in:
Daniel Stenberg 2012-11-12 13:50:00 +01:00
parent e237402c47
commit e62ee60c7a
1 changed files with 12 additions and 3 deletions

View File

@ -2865,7 +2865,10 @@ sub singletest {
$teststat[$testnum]=$why; # store reason for this test case
if(!$short) {
logmsg sprintf("test %03d SKIPPED: $why\n", $testnum);
if($skipped{$why} <= 3) {
# show only the first three skips for each reason
logmsg sprintf("test %03d SKIPPED: $why\n", $testnum);
}
}
timestampskippedevents($testnum);
@ -4738,14 +4741,20 @@ if($skipped && !$short) {
# now show all test case numbers that had this reason for being
# skipped
my $c=0;
my $max = 9;
for(0 .. scalar @teststat) {
my $t = $_;
if($teststat[$_] && ($teststat[$_] eq $r)) {
logmsg ", " if($c);
logmsg $_;
if($c < $max) {
logmsg ", " if($c);
logmsg $_;
}
$c++;
}
}
if($c > $max) {
logmsg " and ".($c-$max)." more";
}
logmsg ")\n";
}
}