[perl #76366] [BUG] Can't access a lexical 'my' variable situated in an immediate block from an 'our'-scoped routine situated in the same block in Rakudo

[jn...@jnthn.net via RT]

On Sat Jul 03 08:01:30 2010, masak wrote:
> <masak> rakudo: { my $a; our sub foo() { $a } }
> <p6eval> rakudo 7017d2: OUTPUT«===SORRY!===␤Symbol '$a' not
> predeclared in foo [...]
> <masak> bug or feature?
> <jnthn> "feature" ;-)
> <masak> grrrr...
> <jnthn> (not really)
> * masak submits rakudofeature
> <jnthn> I think that should work.

Now:

02:15 <@jnthn> rakudo: { my $a = 42; our sub foo() { $a } }; say foo()
02:15 <+p6eval> rakudo d51e99: OUTPUT«42␤»

Given to moritz++ for spectesting.

Thanks,

Jonathan