This works now:

$ perl6-m -e 'my @a = 1..10; @a.first(* %% 2).++; say @a'
1 3 3 4 5 6 7 8 9 10

I added a test for this (and for the example with grep) to S32-list/first.t and 
S32-list/grep.t, respectively, with the following commit: 
https://github.com/perl6/roast/commit/4295bfcfae

Reply via email to