CC-tea/coreutils
1
0
Fork 0
mirror of git://git.sv.gnu.org/coreutils.git synced 2026-04-11 06:34:40 +02:00
Code Issues Projects Releases Wiki Activity

correctly compute number of tests

Browse Source
This commit is contained in:
Jim Meyering
1997-01-30 03:31:40 +00:00
parent 13a5e426f3
commit 4cbcb32a53
4 changed files with 8 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
tests/cut/mk-script.pl
View File

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

3
tests/head/mk-script.pl
View File

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

3
tests/join/mk-script.pl
View File

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

3
tests/ls/mk-script.pl
View File

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