[perl #122218] Strange segfault on MMD / pair / named parameter ambiguity

[via RT]

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


23:00:03] <lizmat>       m: multi a(:$a!) { "named" }; multi a($a) { 
"positional" }; my $a = "a"; say a(a => 1); say a("a" => 1); say a(|($a=>1))
[23:00:04] <+camelia>    rakudo-moar 7bd297: OUTPUT«(signal )named␤positional␤»
[23:00:30] <lizmat>      seems to segfault on the last one, but only if the 
positional is before it
[23:00:45] <lizmat>      m: multi a(:$a!) { "named" }; multi a($a) { 
"positional" }; my $a = "a"; say a(a => 1); say a(|($a=>1))  # doesn't segfault
[23:00:46] <+camelia>    rakudo-moar 7bd297: OUTPUT«named␤named␤»
[23:00:57] <FROGGS>      eww
[23:01:09] <jnthn>       r: multi a(:$a!) { "named" }; multi a($a) { 
"positional" }; my $a = "a"; say a(a => 1); say a("a" => 1); say a(|($a=>1))
[23:01:24] <+camelia>    rakudo-jvm 7bd297: OUTPUT«(timeout)»
[23:01:24] <+camelia>    ..rakudo-{parrot,moar} 7bd297: OUTPUT«(signal 
)named␤positional␤»
[23:01:35] <lizmat>      even on parrot, wow
[23:01:37] <jnthn>       At least they're consistent :P
[23:01:50] <lizmat>      I guess I'll rakudobug this...
[23:01:51] <jnthn>       But yeah, wtf.
[23:01:54] <jnthn>       Plesae do.
[23:01:58] <jnthn>       *please