"without parens" vs "without parentheses"
Iain Truskett [Thu, 3 Jul 2003 12:40:42 +0000 (22:40 +1000)]
Message-ID: <20030703024042.GI12380@ouroboros.anu.edu.au>

p4raw-id: //depot/perl@19944

t/lib/warnings/toke
toke.c

index ca0dc6e..b2c15ba 100644 (file)
@@ -570,7 +570,7 @@ yelp at foo line 30.
 # toke.c
 my $a = rand + 4 ;
 EXPECT
-Warning: Use of "rand" without parens is ambiguous at - line 2.
+Warning: Use of "rand" without parentheses is ambiguous at - line 2.
 ########
 # toke.c
 $^W = 0 ;
@@ -583,9 +583,9 @@ my $a = rand + 4 ;
 }
 $a = rand + 4 ;
 EXPECT
-Warning: Use of "rand" without parens is ambiguous at - line 3.
-Warning: Use of "rand" without parens is ambiguous at - line 8.
-Warning: Use of "rand" without parens is ambiguous at - line 10.
+Warning: Use of "rand" without parentheses is ambiguous at - line 3.
+Warning: Use of "rand" without parentheses is ambiguous at - line 8.
+Warning: Use of "rand" without parentheses is ambiguous at - line 10.
 ########
 # toke.c
 sub fred {};
diff --git a/toke.c b/toke.c
index d57dc0c..bac0380 100644 (file)
--- a/toke.c
+++ b/toke.c
@@ -682,7 +682,7 @@ S_check_uni(pTHX)
         char ch = *s;
         *s = '\0';
         Perl_warner(aTHX_ packWARN(WARN_AMBIGUOUS),
-                  "Warning: Use of \"%s\" without parens is ambiguous",
+                  "Warning: Use of \"%s\" without parentheses is ambiguous",
                   PL_last_uni);
         *s = ch;
     }