summaryrefslogtreecommitdiff
path: root/tests/unexpand/basic-1
diff options
context:
space:
mode:
authorJim Meyering <jim@meyering.net>2005-01-11 17:01:35 +0000
committerJim Meyering <jim@meyering.net>2005-01-11 17:01:35 +0000
commit9be231e1523464558c7ca17b15b2a3c7db67e2e9 (patch)
tree12f4e199d304865afdb5b6a7aad237afa0fab1d1 /tests/unexpand/basic-1
parentc8756077c3981f77b5cb1c24b98568fd74d4a310 (diff)
downloadcoreutils-9be231e1523464558c7ca17b15b2a3c7db67e2e9.tar.xz
(obs-ovflo): New test for overflow.
Diffstat (limited to 'tests/unexpand/basic-1')
-rwxr-xr-xtests/unexpand/basic-16
1 files changed, 5 insertions, 1 deletions
diff --git a/tests/unexpand/basic-1 b/tests/unexpand/basic-1
index ffcb335f7..28a741e97 100755
--- a/tests/unexpand/basic-1
+++ b/tests/unexpand/basic-1
@@ -18,6 +18,8 @@ use strict;
# Turn off localisation of executable's ouput.
@ENV{qw(LANGUAGE LANG LC_ALL)} = ('C') x 3;
+my $prog = $ENV{PROG} || die "$0: \$PROG not specified in environment\n";
+
my @Tests =
(
['a1', {IN=> ' 'x 1 ."y\n"}, {OUT=> ' 'x 1 ."y\n"}],
@@ -66,12 +68,14 @@ my @Tests =
['blanks-11', '-t', '3,4', {IN=> " 4\n"}, {OUT=> "\t\t4\n"}],
['blanks-12', '-t', '3,4', {IN=> "01 4\n"}, {OUT=> "01\t\t4\n"}],
['blanks-13', '-t', '3,4', {IN=> "0 4\n"}, {OUT=> "0\t\t4\n"}],
+
+ ['obs-ovflo', '-18446744073709551617', {IN=>''}, {OUT=>''},
+ {EXIT => 1}, {ERR => "$prog: tab stop value is too large\n"}],
);
my $save_temps = $ENV{DEBUG};
my $verbose = $ENV{VERBOSE};
-my $prog = $ENV{PROG} || die "$0: \$PROG not specified in environment\n";
my $fail = run_tests ($program_name, $prog, \@Tests, $save_temps, $verbose);
exit $fail;
EOF