[perl #118559] [BUG] .clone affects the original object in Rakudo

[Carl Mäsak]

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


<ssutch> r: class Foob { has @.fields; }; my $x =
Foob.new(fields=>['a','b']); my $x2 = $x.clone(:fields('c','d')); say
$x.fields; say $x2.fields;
<camelia> rakudo 49f111: OUTPUT«c d␤c d␤»
<ssutch> clone appears to be affecting the original object?
* masak submits rakudobug
<timotimo> wow, it gets stranger and stranger
<timotimo> also: try :fields<c d> on for size :)

Needless to say, .clone shouldn't change the attributes of the cloned
objects, only of the clone.