diff options
| author | Mark-Jason Dominus <mjd@plover.com> | 2002-04-14 22:41:52 -0400 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-15 12:37:04 +0000 |
| commit | 2710853f89981101efd1c81d1b1394f8120c34e7 (patch) | |
| tree | 6c5cac3bc5fcabad8fe1be2271e986509717657f /t/lib/warnings/toke | |
| parent | ec18bc927e5ed31b399ed88fe24d05c0da6d0d08 (diff) | |
| download | perl-2710853f89981101efd1c81d1b1394f8120c34e7.tar.gz | |
Supporess spurious warnings for @+ and and @-
Message-ID: <20020415064152.16958.qmail@plover.com>
p4raw-id: //depot/perl@15921
Diffstat (limited to 't/lib/warnings/toke')
| -rw-r--r-- | t/lib/warnings/toke | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/t/lib/warnings/toke b/t/lib/warnings/toke index 7f7d84d696..d2695d6b26 100644 --- a/t/lib/warnings/toke +++ b/t/lib/warnings/toke @@ -787,4 +787,12 @@ Name "main::F" used only once: possible typo at - line 4. # 20020414 mjd-perl-patch+@plover.com EXPECT +######## +# toke.c +# 20020414 mjd-perl-patch+@plover.com +# In 5.7.3, this emitted "Possible unintended interpolation" warnings +use warnings 'ambiguous'; +$s = "(@-)(@+)"; +EXPECT + |