Skip to content

Commit

Permalink
i think $y actually supposed to be dynamic here.
Browse files Browse the repository at this point in the history
  • Loading branch information
timo committed Aug 13, 2013
1 parent c790303 commit f5bbfc6
Showing 1 changed file with 1 addition and 2 deletions.
3 changes: 1 addition & 2 deletions S02-names/pseudo.t
Expand Up @@ -311,7 +311,6 @@ plan 142;
}

# CALLER - assumes MY:: has taken care of most access testing
#?rakudo.jvm skip "is dynamic"
{
sub f1($f) { my $x is dynamic = 90; $f() } #OK
sub f2($f) { my $x is dynamic = 91; f1($f) } #OK
Expand All @@ -329,7 +328,7 @@ plan 142;
is f2({ CALLER::<$*foo> }), 92, 'CALLER::<$*foo> works';
is f2({ ::($caller)::('$*foo') }), 92, '::("CALLER")::<$*foo> works';

my $y = 93; #OK
my $y is dynamic = 93; #OK
if 1 {
is $CALLER::y, 93, 'CALLER:: works in inline blocks';
is $::($caller)::y, 93, '::("CALLER") works in inline blocks';
Expand Down

0 comments on commit f5bbfc6

Please sign in to comment.