From 4cbcb32a533fafe82f213f4d2eaaea5bd8820a67 Mon Sep 17 00:00:00 2001
From: Jim Meyering <jim@meyering.net>
Date: Thu, 30 Jan 1997 03:31:40 +0000
Subject: correctly compute number of tests

---
 tests/head/mk-script.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'tests/head')

diff --git a/tests/head/mk-script.pl b/tests/head/mk-script.pl
index 74275c096..48b4b1db6 100644
--- a/tests/head/mk-script.pl
+++ b/tests/head/mk-script.pl
@@ -220,6 +220,7 @@ EOF1
 
   validate ();
 
+  my $n_tests = 0;
   my $test_vector;
   foreach $test_vector (Test::test_vector ())
     {
@@ -285,6 +286,7 @@ EOF1
 	      $msg = "($msg)" if $msg;
 	      my $t_name = "$test_name$msg";
 	      my $e_cmd = ($e ? "$e " : '');
+	      ++$n_tests;
 	      print <<EOF;
 $e_cmd$cmd
 code=\$?
@@ -307,7 +309,6 @@ EOF
 	    }
 	}
     }
-  my $n_tests = Test::test_vector ();
   print <<EOF3 ;
 if test \$errors = 0 ; then
   \$echo Passed all $n_tests tests. 1>&2
-- 
cgit v1.2.3-70-g09d2