[perl #78870] [BUG] Wrapping a detached method breaks method deferral in Rakudo

[Carl Mäsak]

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


<masak> rakudo: class A { method foo { say "A" } }; class B is A {
method foo { say "B"; nextsame } }; B.new.foo
<p6eval> rakudo 142d22: OUTPUT«B␤A␤»
<masak> rakudo: class A { method foo { say "A" } }; class B is A {
method foo { say "B"; nextsame } }; my &x = B.WALK(:name<foo>)[0];
&x.wrap: { say "wrap"; nextsame }; x(B.new)
<p6eval> rakudo 142d22: OUTPUT«wrap␤B␤»
* masak submits rakudobug
<masak> why doesn't the last evaluation print "wrap␤B␤A␤"?