Skip to content
Permalink
master
Switch branches/tags
Go to file
 
 
Cannot retrieve contributors at this time
use v6;
use Test;
# L<S04/Control Exceptions>
# Test primarily aimed at Niecza
plan 1;
{
sub foo($x = last) { $x }
my $i = 0;
for 1,2,3 { $i++; foo(); }
is $i, 1, 'control operator last can be used in an inferior context';
}
# vim: expandtab shiftwidth=4