diff options
author | Jim Meyering <jim@meyering.net> | 2000-06-24 07:36:14 +0000 |
---|---|---|
committer | Jim Meyering <jim@meyering.net> | 2000-06-24 07:36:14 +0000 |
commit | a674a3c010a1668cb581340383c1131dceda2bf0 (patch) | |
tree | 2476e8a9da6fcd5472061fb4939868f3fa4a6fdd /tests | |
parent | fad24ae80d21f14215588bb6865a5eaa06bb9a2a (diff) | |
download | coreutils-a674a3c010a1668cb581340383c1131dceda2bf0.tar.xz |
*** empty log message ***
Diffstat (limited to 'tests')
-rwxr-xr-x | tests/sum/basic-1 | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/tests/sum/basic-1 b/tests/sum/basic-1 index 90ba6ed2c..5c12dfb51 100755 --- a/tests/sum/basic-1 +++ b/tests/sum/basic-1 @@ -19,6 +19,9 @@ use strict; # Turn off localisation of executable's ouput. @ENV{qw(LANGUAGE LANG LC_ALL)} = ('C') x 3; +my $in_1k = 'a' x 1024; +my $in_2k = 'b' x 2048; + my @Tests = ( ['1', {IN=> {f=> ''}}, {OUT=>"00000 0\n"}], @@ -29,6 +32,21 @@ my @Tests = ['6', {IN=> {f=> join ('', 'A'..'Z', 'a'..'z', '0'..'9')}}, {OUT=>"25587 1\n"}], ['7', {IN=> {f=> '1234567890' x 8}}, {OUT=>"21845 1\n"}], + + ['a-r-1k', '-r', {IN=> {f=> $in_1k}}, {OUT=>"65409 1\n"}], + ['a-s-1k', '-s', {IN=> {f=> $in_1k}}, {OUT=>"33793 2 f\n"}], + ['b-r-2k', '-r', {IN=> {f=> $in_2k}}, {OUT=>"65223 2\n"}], + ['b-s-2k', '-s', {IN=> {f=> $in_2k}}, {OUT=>"4099 4 f\n"}], + + ['1s', '-s', {IN=> {f=> ''}}, {OUT=>"0 0 f\n"}], + ['2s', '-s', {IN=> {f=> 'a'}}, {OUT=>"97 1 f\n"}], + ['3s', '-s', {IN=> {f=> 'abc'}}, {OUT=>"294 1 f\n"}], + ['4s', '-s', {IN=> {f=> 'message digest'}}, {OUT=>"1413 1 f\n"}], + ['5s', '-s', {IN=> {f=> 'abcdefghijklmnopqrstuvwxyz'}}, + {OUT=>"2847 1 f\n"}], + ['6s', '-s', {IN=> {f=> join ('', 'A'..'Z', 'a'..'z', '0'..'9')}}, + {OUT=>"5387 1 f\n"}], + ['7s', '-s', {IN=> {f=> '1234567890' x 8}}, {OUT=>"4200 1 f\n"}], ); my $save_temps = $ENV{DEBUG}; |