# New Ticket Created by Moritz Lenz
# Please include the string: [perl #63902]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=63902 >
Rakudo 087e299898416ca6c3a6e2b2bdc3785d841f0ec6:
>From the parent:
$ >./perl6 -e 'class P { submethod BUILD($o) { say self.WHAT; $o.doit(2)
} }; class C is P { has $!a; method doit($x) { $!a = $x; }}; C.new()'
P
Null PMC access in getprop()
In a class itself:
$ ./perl6 -e 'class P { has $.foo; submethod BUILD($o) { $!foo = 3 }};
P.new'
Null PMC access in getprop()
current instr.: 'infix:=' pc 13972 (src/builtins/assign.pir:21)
called from Sub 'parrot;P;BUILD' pc 225 (EVAL_20:94)
called from Sub 'parrot;Perl6Object;BUILDALL' pc 1071
(src/classes/Object.pir:371)
called from Sub '_block14' pc 74 (EVAL_20:41)
called from Sub '!UNIT_START' pc 17161 (src/builtins/guts.pir:325)
called from Sub 'parrot;PCT;HLLCompiler;eval' pc 950
(src/PCT/HLLCompiler.pir:527)
called from Sub 'parrot;PCT;HLLCompiler;command_line' pc 1496
(src/PCT/HLLCompiler.pir:787)
called from Sub 'parrot;Perl6;Compiler;main' pc 21458 (perl6.pir:163)
