diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-04-24 21:12:40 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2002-04-24 21:12:40 +0000 |
commit | 6459ac829bd1a96f973e52e8b1d80e6d53059e69 (patch) | |
tree | 4c6aabd979371a9a33d178af2fa07a1986db0577 /t | |
parent | 78915d94c171e39992d319c2527f3ec732f3da97 (diff) | |
download | perl-6459ac829bd1a96f973e52e8b1d80e6d53059e69.tar.gz |
Add an untested warning variant.
p4raw-id: //depot/perl@16148
Diffstat (limited to 't')
-rw-r--r-- | t/lib/warnings/op | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/t/lib/warnings/op b/t/lib/warnings/op index 9b20a8c256..387e620efa 100644 --- a/t/lib/warnings/op +++ b/t/lib/warnings/op @@ -130,10 +130,13 @@ __END__ use warnings 'misc' ; my $x ; my $x ; +my $y = my $y ; no warnings 'misc' ; my $x ; +my $y ; EXPECT "my" variable $x masks earlier declaration in same scope at - line 4. +"my" variable $y masks earlier declaration in same statement at - line 5. ######## # op.c use warnings 'closure' ; |