[perl #78280] [BUG] Null PMC access when assigning to a variable in a package that doesn't exist in Rakudo

[Will Coleda via RT]

On Thu Oct 07 14:46:24 2010, masak wrote:
> <tylercurtis> rakudo: my $b; -> $_ is rw = $OUTER::_ { $_ = 5; $b =
> {.say}}(); .say; $_ = 42; $b();
> <p6eval> rakudo 377615: OUTPUT�Null PMC access in getprop() [...]
> * masak submits rakudobug for tylercurtis Null PMC access
> <masak> rakudo: -> $_ is rw = $OUTER::_ { $_ = 5 }()
> <p6eval> rakudo 377615: OUTPUT�Null PMC access in getprop() [...]
> <masak> rakudo: -> $_ is rw = $FOO::a { $_ = 5 }()
> <p6eval> rakudo 377615: OUTPUT�Null PMC access in getprop() [...]
> <masak> hihihi

Fixed:

17:16 < [Coke]> rakudo: my $b; -> $_ is rw = $OUTER::_ { $_ = 5; $b =
                {.say}}(); .say; $_ = 42; $b();
17:16 <+p6eval> rakudo 33f1cf: OUTPUT«Any()␤5␤»
17:16 < [Coke]> rakudo: -> $_ is rw = $OUTER::_ { $_ = 5 }()
17:16 <+p6eval> rakudo 33f1cf:  ( no output )
17:16 < [Coke]> rakudo: -> $_ is rw = $FOO::a { $_ = 5 }()
17:16 <+p6eval> rakudo 33f1cf:  ( no output )
17:16 < [Coke]> rakudo: $FOO::a = 42
17:16 <+p6eval> rakudo 33f1cf:  ( no output )

Closable with tests.

-- 
Will "Coke" Coleda