[perl #122899] Cannot apply trait 'is cached' on multi candidate

[via RT]

# New Ticket Created by  Tobias Leich 
# Please include the string:  [perl #122899]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=122899 >


FROGGS m: multi foo(Int) is cached { say 'Int' }; multi foo(Str) { say 'Str' }; 
foo 1; foo 1; foo 'a'; foo 'a'
camelia rakudo-moar b3331e: OUTPUT«Cannot invoke object with invocation handler 
in this context␤  in sub foo at /tmp/zWM01_TzeB:1␤  in block <unit> at 
/tmp/zWM01_TzeB:1␤␤»
FROGGS :/
FROGGS I feared that
lizmat that's odd, the wrap should only be applied to the first
FROGGS m: multi foo(Int) is cached { say 'Int' }; foo 1; foo 1;
camelia rakudo-moar b3331e: OUTPUT«Cannot invoke object with invocation handler 
in this context␤  in sub foo at /tmp/EpBFnacF6n:1␤  in block <unit> at 
/tmp/EpBFnacF6n:1␤␤»
lizmat that's worthy of a rakudobug
FROGGS m: sub foo(Int) is cached { say 'Int' }; foo 1; foo 1;
camelia rakudo-moar b3331e: OUTPUT«Int␤»
FROGGS yeah