tests: add option processing tests for 'expr'
authorPádraig Brady <P@draigBrady.com>
Wed, 15 Oct 2008 14:01:43 +0000 (15:01 +0100)
committerJim Meyering <meyering@redhat.com>
Wed, 15 Oct 2008 14:32:05 +0000 (16:32 +0200)
* tests/misc/expr: Add tests for various combinations
of options where the first part of the expression
could be confused with an option.

tests/misc/expr

index b790d20..41f5ac8 100755 (executable)
@@ -39,6 +39,15 @@ my @Tests =
      ['f', '3 + -2', {OUT => '1'}],
      ['g', '-2 + -2', {OUT => '-4'}],
 
+     # Verify option processing.
+     # Added when option processing broke in the 7.0 beta release
+     ['opt1', '-- -11 + 12', {OUT => '1'}],
+     ['opt2', '-11 + 12', {OUT => '1'}],
+     ['opt3', '-- -1 + 2', {OUT => '1'}],
+     ['opt4', '-1 + 2', {OUT => '1'}],
+     # This evoked a syntax error diagnostic before 2.0.12.
+     ['opt5', '-- 2 + 2', {OUT => '4'}],
+
      ['paren1', '\( 100 % 6 \)', {OUT => '4'}],
      ['paren2', '\( 100 % 6 \) - 8', {OUT => '-4'}],
      ['paren3', '9 / \( 100 % 6 \) - 8', {OUT => '-6'}],
@@ -59,8 +68,6 @@ my @Tests =
      # In 5.1.3 and earlier, this would output the empty string.
      ['orempty', '"" \| ""', {OUT => '0'}, {EXIT => 1}],
 
-     # This evoked a syntax error diagnostic before 2.0.12.
-     ['minus2', '-- 2 + 2', {OUT => '4'}],
 
      # This erroneously succeeded and output `3' before 2.0.12.
      ['fail-a', '3 + -', {ERR => "$prog: non-numeric argument\n"},