[perl #99134] [BUG] Can't bind parameters in nested signatures from a Pair object in Rakudo

[Carl Mäsak]

# New Ticket Created by  "Carl Mäsak" 
# Please include the string:  [perl #99134]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=99134 >


<masak> rakudo: my @a = a => 1, b => 2; for @a -> Pair $p ( $key,
$value ) { say $key }
<p6eval> rakudo 6c9731: OUTPUT«Not enough positional parameters
passed; got 0 but expected 2 in sub-signature of parameter $p [...]
<jnthn> rakudo: my @a = a => 1, b => 2; for @a -> Pair $p ( :$key,
:$value) { say $key }
<p6eval> rakudo 6c9731: OUTPUT«Mu()␤Mu()␤»
<jnthn> hmm
<jnthn> rakudo: (a => 1).^attributes>>.has_accessor>>.say
<p6eval> rakudo 6c9731: OUTPUT«Bool::False␤Bool::False␤»
<jnthn> ah.
<jnthn> masak: Are you going to masakbug the above?
<jnthn> masak: I'm compiling a patch now but it deserves a test.
<jnthn> masak: And getting you to submit a bug report is the laziest
way I can make sure it gets tested :P
* masak submits rakudobug, on request
<masak> jnthn: I'm sorry, I woulda done it sooner. I was sure that one
had an RT ticket already.
<masak> I mean, how could it not? it's been known for ages.
<masak> seems there isn't one, so here goes.