diff --git a/tests/keywords.pl b/tests/keywords.pl index 0a2d38709..6eaff4e4c 100755 --- a/tests/keywords.pl +++ b/tests/keywords.pl @@ -131,7 +131,8 @@ for $t (@mtest) { printf "
$count tests (%d lack keywords)\n", +printf "
$count out of %d tests (%d lack keywords)\n", + scalar(@miss) + $count, scalar(@miss); for(@miss) { @@ -140,7 +141,8 @@ for(@miss) { print STDERR "\n"; -print "
Error codes tested for:
\n";
+printf "
%d different error codes tested for:
\n",
+ scalar(keys %errors);
# numerically on amount, or alphebetically if same amount
my @etest = sort { $a <=> $b} keys %errors;