[perl #78678] [BUG] Lvalue of default accessor of base class stores into same-named attribute of derived class in Rakudo

[Carl Mäsak]

# New Ticket Created by  "Carl Mäsak" 
# Please include the string:  [perl #78678]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=78678 >


<masak> rakudo: class A { has $.x is rw; method foo { say $!x } };
class B is A { has $.x; method bar { say $!x } }; given B.new(:x(42))
{ .A::x = 5; .foo; .bar }
<p6eval> rakudo 479650: OUTPUT«5␤5␤»
<masak> this, I posit, is RONG.
<masak> I don't know if that's in RT yet.
<sjohnson> heh
<masak> huh; actually I expected that to be 42\n42\n.
<masak> well, not "expected" as in "what correct Perl 6 should
produce" expected :)
<masak> but "expected" as in "how I thought rakudo would misbehave" expected
<masak> guess I can produce an entirely *different* bug out of it, then.
<masak> rakudo: class A { has $.x is rw }; class B is A { has $.x };
given B.new(:x(42)) { .A::x = 5; say .x }
<p6eval> rakudo 479650: OUTPUT«5␤»
* masak submits rakudobug