diff options
Diffstat (limited to 't/lib/croak/pp_ctl')
-rw-r--r-- | t/lib/croak/pp_ctl | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/t/lib/croak/pp_ctl b/t/lib/croak/pp_ctl index ec664138e0..42319ff2e8 100644 --- a/t/lib/croak/pp_ctl +++ b/t/lib/croak/pp_ctl @@ -1,4 +1,11 @@ __END__ +# NAME goto into foreach +no warnings 'deprecated'; +goto f; +foreach(1){f:} +EXPECT +Can't "goto" into the middle of a foreach loop at - line 3. +######## # NAME dump with computed label no warnings 'deprecated'; my $label = "foo"; |