Change 16148 by rgs@rgs-home on 2002/04/24 21:12:40
Add an untested warning variant.
Affected files ...
.... //depot/perl/t/lib/warnings/op#11 edit
Differences ...
==== //depot/perl/t/lib/warnings/op#11 (text) ====
Index: perl/t/lib/warnings/op
--- perl/t/lib/warnings/op.~1~ Wed Apr 24 15:30:05 2002
+++ perl/t/lib/warnings/op Wed Apr 24 15:30:05 2002
@@ -130,10 +130,13 @@
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' ;
End of Patch.