diff options
author | Patrick Monnerat <pm@datasphere.ch> | 2012-11-12 14:27:43 +0100 |
---|---|---|
committer | Patrick Monnerat <pm@datasphere.ch> | 2012-11-12 14:27:43 +0100 |
commit | cd5261ea6d66b54754125e0ffe0b38e4c688e1b0 (patch) | |
tree | c06b39f8aad22e4b14dfcb44defcef74b7b6d8ac | |
parent | 4b994e14fbcd67c60023ee95f967719da24e3e94 (diff) | |
parent | e62ee60c7a32d14130cb4139409292845976267b (diff) |
Merge branch 'master' of github.com:bagder/curl
-rwxr-xr-x | tests/runtests.pl | 15 |
1 files changed, 12 insertions, 3 deletions
diff --git a/tests/runtests.pl b/tests/runtests.pl index 6f8a51751..e263788af 100755 --- a/tests/runtests.pl +++ b/tests/runtests.pl @@ -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"; } } |