CC-tea/coreutils
1
0
Fork 0
mirror of git://git.sv.gnu.org/coreutils.git synced 2026-04-21 03:12:48 +02:00
Code Issues Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
Jim Meyering
1998-06-07 14:40:04 +00:00
parent ed1fdb8841
commit 500594433a
1 changed files with 11 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
tests/test/Test.pm
View File

@@ -81,6 +81,17 @@ sub test_vector
}
}
# Generate a negated and a double-negated version of each test.
# There are a few exceptions.
my %not_invertible = map {$_ => 1} qw (1a inv-1 t1);
foreach $t (@tvec)
{
my ($test_name, $flags, $in, $exp, $ret) = @$t;
next if $not_invertible{$test_name};
push (@tv, ["N-$test_name", "! '(' $flags ')'", $in, $exp, 1 - $ret]);
push (@tv, ["NN-$test_name", "! ! '(' $flags ')'", $in, $exp, $ret]);
}
return (@tv, @tvec);
}