[perl #131270] Grabbing or picking NaN elements from a BagHash should not work (say ^5 .BagHash.pick(NaN))

[Zoffix Znet via RT]

On Mon, 08 May 2017 06:05:36 -0700, alex.jakime...@gmail.com wrote:
> Code:
> my $x = (^5).BagHash;
> say $x.grab(NaN);
> say $x
> 
> Result:
> [1 2 3 0 4]
> BagHash.new()
> 
> 
> In other words, it works like if you grabbed ∞ or *. It should
> probably error out in some way.

Thank you for the report. This is now fixed.

Fix: https://github.com/rakudo/rakudo/commit/60f898194f
Tests: https://github.com/perl6/roast/commit/b6073e1782