From: Hugo van der Sanden <hv@iii.co.uk>
Date: Thu, 6 Mar 1997 19:03:35 +0000 (+0000)
Subject: Fix counts in output of TEST
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=3d9caabd40a64fc765db33cde6b98e2a9c531c08;p=p5sagit%2Fp5-mst-13.2.git

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
---

diff --git a/t/TEST b/t/TEST
index 8b34c82..a6cca53 100755
--- a/t/TEST
+++ b/t/TEST
@@ -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 $_;