gistfile1.none

pmichaud@kiwi:~/nom$ cat z
my class YYY {
    method yyy() { 'hello'; }
};

my class XXX {
    method xxx() { Y }
};

my $x = XXX.new();
say $x.WHAT;
say $x.xxx.WHAT;


pmichaud@kiwi:~/nom$ ./perl6 z
XXX()
Null PMC access in invoke()
current instr.: 'xxx' pc 1422 ((file unknown):95) (:6)
called from Sub '_block13' pc 162 ((file unknown):84) (:11)
called from Sub '_block11' pc 14 ((file unknown):12) (:1)
called from Sub 'nqp;HLL;Compiler;_block1712' pc 36954 (src/stage2/gen/NQPHLL.pir:0)
called from Sub 'nqp;HLL;Compiler;eval' pc 36815 (src/stage2/gen/NQPHLL.pir:11476)
called from Sub 'nqp;HLL;Compiler;evalfiles' pc 38810 (src/stage2/gen/NQPHLL.pir:12274)
called from Sub 'nqp;HLL;Compiler;command_line' pc 37969 (src/stage2/gen/NQPHLL.pir:11922)
called from Sub 'MAIN' pc 701 (src/gen/perl6.pir:222)
called from Sub '_block11' pc 94 (src/gen/perl6.pir:57)
pmichaud@kiwi:~/nom$