diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-11 22:32:06 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-11 22:32:06 +0000 |
| commit | 95c31fe33ee6822711c5d165d868e95b4502fd4b (patch) | |
| tree | 929be52777af277066e89f0daa7273d40914c843 /t/pragma | |
| parent | 840f4517852958551aa3f455da9833ccf142f79a (diff) | |
| download | perl-95c31fe33ee6822711c5d165d868e95b4502fd4b.tar.gz | |
Revert the -f ambiguousity patch, seems to cause
too much hassle (the interpret -Q as a function
where Q is not a known filetest part is left in).
p4raw-id: //depot/perl@8084
Diffstat (limited to 't/pragma')
| -rw-r--r-- | t/pragma/warn/toke | 19 |
1 files changed, 0 insertions, 19 deletions
diff --git a/t/pragma/warn/toke b/t/pragma/warn/toke index 1f8b14283a..2c9433bd7d 100644 --- a/t/pragma/warn/toke +++ b/t/pragma/warn/toke @@ -123,9 +123,6 @@ toke.c AOK Ambiguous use of %c resolved as operator %c *foo *foo - Ambiguous -f%c call resolved as a file test [yylex] - sub f { }; -f(0) - __END__ # toke.c use warnings 'deprecated' ; @@ -567,19 +564,3 @@ no warnings 'ambiguous'; "@mjd_previously_unused_array"; EXPECT Possible unintended interpolation of @mjd_previously_unused_array in string at - line 3. -######## -# toke.c -use warnings 'ambiguous'; -sub f { 24 } --f("TEST"); -print - f("TEST"); -print -(f("TEST")); -print -f ("TEST"); -print -f "TEST"; -sub Q { 42 }; -print -Q(); -EXPECT -Ambiguous -f() resolved as a file test at - line 4. -Ambiguous -f() resolved as a file test at - line 7. --24-2411-42 - |