gistfile1.none

pmichaud@kiwi:~/nom$ cat zz
class ABC {
    has $!xyz;

    method abc() {
        pir::setattribute__0PPsP(self, ABC, '$!xyz',
                                 pir::new__Ps('ResizablePMCArray'))
    }
}


class DEF is ABC { }

my $d = DEF.new;
$d.abc;

pmichaud@kiwi:~/nom$ ./perl6 zz
P6opaque attributes NYFI 4
current instr.: 'abc' pc 1359 ((file unknown):343) (:1)
called from Sub '_block13' pc 143 ((file unknown):78) (:14)
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)