From 9be231e1523464558c7ca17b15b2a3c7db67e2e9 Mon Sep 17 00:00:00 2001 From: Jim Meyering Date: Tue, 11 Jan 2005 17:01:35 +0000 Subject: (obs-ovflo): New test for overflow. --- tests/unexpand/basic-1 | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'tests/unexpand') 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 -- cgit v1.2.3-54-g00ecf