From a674a3c010a1668cb581340383c1131dceda2bf0 Mon Sep 17 00:00:00 2001 From: Jim Meyering Date: Sat, 24 Jun 2000 07:36:14 +0000 Subject: [PATCH] *** empty log message *** --- tests/sum/basic-1 | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) diff --git a/tests/sum/basic-1 b/tests/sum/basic-1 index 90ba6ed..5c12dfb 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}; -- 2.7.4