[perl #116527] [BUG] Mixing into a List causes it to be unprintable in Rakudo

[Will Coleda via RT]

On Wed Jan 23 06:47:55 2013, masak wrote:
> <[Coke]> r: role c {}; my @a = 1,2,3,4; my $b = @a.pick(2) but c; say
> $b.WHAT; say $b;
> <p6eval> rakudo 388c1b: OUTPUT«List+{c}()␤elements() not implemented
> in class 'Mu' [...]
> <masak> r: my @a = 1,2,3,4; my $b = @a.pick(2); say $b.WHAT; say $b;
> <p6eval> rakudo 388c1b: OUTPUT«List()␤2 1␤»
> * masak submits rakuodbug
> <[Coke]> \o/

Fixed in the glr branch:

09:03 < [Coke]> r: role c {}; my @a = 1,2,3,4; my $b = @a.pick(2) but c; say 
$b.WHAT; say $b;
09:03 < GLRelia> rakudo-moar 2ccea7: OUTPUT«(Seq+{c})␤2 4␤»

-- 
Will "Coke" Coleda