diff options
author | Hugo van der Sanden <hv@iii.co.uk> | 1997-03-06 19:03:35 +0000 |
---|---|---|
committer | Chip Salzenberg <chip@atlantic.net> | 1997-03-07 04:01:12 +1200 |
commit | 3d9caabd40a64fc765db33cde6b98e2a9c531c08 (patch) | |
tree | ebe44ffa5d9a25c9d0a137027b31633e708e5ff1 | |
parent | eeba3357c3adf46b04bd319c3720eede609434e0 (diff) | |
download | perl-3d9caabd40a64fc765db33cde6b98e2a9c531c08.tar.gz |
Fix counts in output of TEST
Solaris 2.5.1: clean make, test and install, except for a slight bug in
t/TEST itself. Before the patch below it reports:
All tests successful.
u=0.45 s=0.44 cu=27.36 cs=13.53 scripts=1 tests=17
and after, it reports:
All tests successful.
u=0.44 s=0.35 cu=28.39 cs=13.93 scripts=145 tests=3618
p5p-msgid: 331F1507.4BE8@iii.co.uk
-rwxr-xr-x | t/TEST | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -41,6 +41,8 @@ else { $bad = 0; $good = 0; $total = @ARGV; +$files = 0; +$totmax = 0; while ($test = shift) { if ($test =~ /^$/) { next; @@ -67,8 +69,6 @@ while ($test = shift) { } $ok = 0; $next = 0; - $files = 0; - $totmax = 0; while (<RESULTS>) { if ($verbose) { print $_; |