From @masak

<masak> rakudo​: class A { has $.b; }; while shift [A.new( :b(0) )] ->
$a { say $a.b; $a.clone( :b($a.b + 1) ); say $a.b; last; }
<polyglotbot> OUTPUT[0␤1␤]
* masak submits rakudobug

From @jnthn

On Tue Jan 27 05​:27​:07 2009, masak wrote​:

<masak> rakudo​: class A { has $.b; }; while shift [A.new( :b(0) )] ->
$a { say $a.b; $a.clone( :b($a.b + 1) ); say $a.b; last; }
<polyglotbot> OUTPUT[0␤1␤]
* masak submits rakudobug

Fixed in git 59024e0 and added pretty much this exact code as a test
case to S12-attributes/clone.t.

Thanks!

Jonathan

The RT System itself - Status changed from 'new' to 'open'

@jnthn - Status changed from 'open' to 'resolved'