[perl #111498] [BUG] something weird is going on with object hashes and mixed-in objects in Rakudo

[Christian Bartolomaeus via RT]

Current behaviour:

$ perl6-m -e 'my $r1 = role { method foo() { 5 } }; my $r2 = role { method 
foo() { 7 } }; my %hash{Any}; %hash{"quux" but $r1} = 9; %hash{"quux" but $r2} 
= 11; say %hash.keys>>.foo'
(5 7)

Is that the expected answer?