]> git.ipfire.org Git - thirdparty/coreutils.git/commitdiff
*** empty log message ***
authorJim Meyering <jim@meyering.net>
Sat, 24 Jun 2000 07:36:14 +0000 (07:36 +0000)
committerJim Meyering <jim@meyering.net>
Sat, 24 Jun 2000 07:36:14 +0000 (07:36 +0000)
tests/sum/basic-1

index 90ba6ed2c7956ee86df21b0633ae4f3c89b80dff..5c12dfb51d809454aaa09722532be0fa7fc23401 100755 (executable)
@@ -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};