components/coreutils/patches/tests-misc-expr.patch
changeset 987 810b92005f34
child 1833 0edb05d72e6b
equal deleted inserted replaced
986:ebade8aad240 987:810b92005f34
       
     1 ---  coreutils-8.16/tests/misc/expr.orig	2012-09-03 07:18:28.214998564 -0700
       
     2 +++  coreutils-8.16/tests/misc/expr	2012-09-03 07:22:12.547808280 -0700
       
     3 @@ -140,7 +140,11 @@
       
     4       ['bre48', '_ : "a\\{1,x"',
       
     5        {ERR => "$prog: Unmatched \\{\n"}, {EXIT => 2}],
       
     6       ['bre49', '_ : "a\\{32768\\}"',
       
     7 -      {ERR => "$prog: Invalid content of \\{\\}\n"}, {EXIT => 2}],
       
     8 +      {ERR => "$prog: Invalid content of \\{\\}\n"}, {EXIT => 2},
       
     9 +      # Map AIX-6's different diagnostic to the one we expect:
       
    10 +      {ERR_SUBST =>
       
    11 +       's,Regular expression too big,Invalid content of \\\\{\\\\},'},
       
    12 +      ],
       
    13       ['bre50', '_ : "a\\{1,0\\}"',
       
    14        {ERR => "$prog: Invalid content of \\{\\}\n"}, {EXIT => 2}],
       
    15       ['bre51', '"acabc" : ".*ab\\{0,0\\}c"', {OUT => '2'}],
       
    16 @@ -171,7 +175,7 @@
       
    17      );
       
    18  
       
    19  # If using big numbers fails, remove all /^bignum-/ tests
       
    20 -`expr $big_prod '*' $big_prod '*' $big_prod`
       
    21 +qx!expr $big_prod '*' $big_prod '*' $big_prod!
       
    22    or @Tests = grep {$_->[0] !~ /^bignum-/} @Tests;
       
    23  
       
    24  # Append a newline to end of each expected 'OUT' string.