moparisthebest
/
curl
mirror of https://github.com/moparisthebest/curl
1
0
Fork 0
Code Issues Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
tests/runtests.pl
View File

@ -2865,7 +2865,10 @@ sub singletest {
$teststat[$testnum]=$why; # store reason for this test case $teststat[$testnum]=$why; # store reason for this test case
if(!$short) { 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); timestampskippedevents($testnum);
@ -4738,14 +4741,20 @@ if($skipped && !$short) {
# now show all test case numbers that had this reason for being # now show all test case numbers that had this reason for being
# skipped # skipped
my $c=0; my $c=0;
my $max = 9;
for(0 .. scalar @teststat) { for(0 .. scalar @teststat) {
my $t = $_; my $t = $_;
if($teststat[$_] && ($teststat[$_] eq $r)) { if($teststat[$_] && ($teststat[$_] eq $r)) {
logmsg ", " if($c); if($c < $max) {
logmsg $_; logmsg ", " if($c);
logmsg $_;
}
$c++; $c++;
} }
} }
if($c > $max) {
logmsg " and ".($c-$max)." more";
}
logmsg ")\n"; logmsg ")\n";
} }
} }