# New Ticket Created by David Warring # Please include the string: [perl #121802] # in the subject line of all future correspondence about this issue. # <URL: https://rt.perl.org/Ticket/Display.html?id=121802 >
Here's a slightly golfed version of the prime example from integration/advent2012-day14.t use v6; my @primes := 2, 3, 5, -> $p { ($p+2, $p+4 ... &is-prime)[*-1] } ... *; sub is-prime($n) { $n %% none @primes ...^ * > sqrt $n } is-prime($_) for 2 .. 20; is-prime($_) for 2 .. 30; ./perl6-j -Ilib tst.pl Cannot do aggregate operation on a type object in method reify at gen/jvm/CORE.setting:7542 in method reify at gen/jvm/CORE.setting:7536 in method gimme at gen/jvm/CORE.setting:7991 in method Bool at gen/jvm/CORE.setting:7889 in block at gen/jvm/CORE.setting:16800 in block at gen/jvm/CORE.setting:7785 in block at gen/jvm/CORE.setting:7787 in method reify at gen/jvm/CORE.setting:7813 in method reify at gen/jvm/CORE.setting:7536 in method reify at gen/jvm/CORE.setting:7536 in method reify at gen/jvm/CORE.setting:7536 in method reify at gen/jvm/CORE.setting:7536 in method gimme at gen/jvm/CORE.setting:7991 in method eager at gen/jvm/CORE.setting:7963 in method new at gen/jvm/CORE.setting:3358 in sub none at gen/jvm/CORE.setting:3479 in sub is-prime at tst.pl:4 in block at tst.pl:7 Working on Moar and Parrot.