# New Ticket Created by David Warring
# Please include the string: [perl #122497]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=122497 >
Consider:
BEGIN my %cache = 1 => 0;
sub foo($n) {%cache{$n}:exists}
say foo(42);
This runs successfully on MoarVM 2014.07-138-ga33da53, Both Parrot and JVM fail:
perl6-p:
This type cannot unbox to a native string
in method exists_key at gen/parrot/CORE.setting:9194
in method exists_key at gen/parrot/CORE.setting:9183
in block at gen/parrot/CORE.setting:2089
in sub postcircumfix:<{ }> at gen/parrot/CORE.setting:2676
in sub postcircumfix:<{ }> at gen/parrot/CORE.setting:2657
in sub foo at tst.pl:2
in block at tst.pl:3
perl6-j:
This representation can not unbox to a native str
in method exists_key at gen/jvm/CORE.setting:9202
in block at gen/jvm/CORE.setting:2085
in sub postcircumfix:<{ }> at gen/jvm/CORE.setting:2671
in sub foo at tst.pl:2
in block at tst.pl:3
The above is golfed from advent2012-day4.t, which has been failing over the
last week, as have advent2011-day04.t and integration/advent2012-day21.t.