[perl #77184] [BUG] Odd "'self' not found" error when mixing a role (containing a 'my $!foo' declaration) into a class in Rakudo

[Will Coleda via RT]

On Thu Aug 12 14:35:18 2010, masak wrote:
> <tylercurtis> rakudo: role A { my $!foo; }; role B { my $!foo; };
> class C does A does B; say 'alive';

12:08 < [Coke]> rakudo: role A { my $!foo; }; role B { my $!foo; }; class C
                does A does B; say 'alive';
12:08 <+p6eval> rakudo f6eb61: OUTPUT«===SORRY!===␤Too late for semicolon form
                of $*PKGDECL definition at line 1, near "say 'alive"␤»


Can you rephrase the code to either still show the issue or show that it's 
fixed?

> <p6eval> rakudo 811c1c: OUTPUT«===SORRY!===␤Lexical 'self' not found␤»
> <masak> rakudo: role A { my $!foo }; class C does A {}
> <p6eval> rakudo 811c1c: OUTPUT«===SORRY!===␤Lexical 'self' not found␤»
> <masak> tylercurtis: known bug?
> <tylercurtis> masak: Don't know.
> * masak submits rakudobug
> <masak> rakudo: role A { my $!foo }; say "alive"
> <p6eval> rakudo 811c1c: OUTPUT«alive␤»
> <masak> rakudo: role A { my $!foo }; say A.new; say "alive"
> <p6eval> rakudo 811c1c: OUTPUT«Lexical 'self' not found␤[...]
> <masak> interesting.
> <masak> observe how those are actually two types of errors. is the
> first parse-time and the second run-time, or something?


-- 
Will "Coke" Coleda