[perl #77152] Rakudo can't parse lexical subrule calls with arguments in regexes.

[via RT]

# New Ticket Created by  Tyler Curtis 
# Please include the string:  [perl #77152]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=77152 >


Here's a relevant irclog:

[8:58pm] pmichaud: rakudo:  my regex foo($s) { $s };  say 'a' ~~ / <&foo('a')> /
[8:58pm] p6eval: rakudo fcf4f3: OUTPUT«===SORRY!===␤regex assertion
not terminated by angle bracket at line 22, near "('a')> /"␤»
[8:58pm] pmichaud: rakudo:  my regex foo($s) { $s };  say 'a' ~~ / <foo('a')> /
[8:59pm] p6eval: rakudo fcf4f3: OUTPUT«Method 'foo' not found for
invocant of class 'Cursor'␤  in <anon> at line 22:/tmp/1_T4OrYTpn␤  in
'Cool::match' at line 2406:CORE.setting␤  in 'Regex::ACCEPTS' at line
5676:CORE.setting␤  in main program body at line 22:/tmp/1_T4OrYTpn␤»
[8:59pm] pmichaud: a-ha
[8:59pm] pmichaud: it doesn't know how to parse circumfixes on variables
[8:59pm] pmichaud: a-ha
[8:59pm] pmichaud: because STD.pm parses an entire expression there
[8:59pm] pmichaud: we might be able to handle that.
[9:00pm] pmichaud: please file rakudobug if you get a chance.

This also occurs with <&foo: 'a'>.

For either "my regex foo($s) { $s }; say 'a' ~~ / <&foo('a')> /;" or
"my regex foo($s) { $s }; say 'a' ~~ / <&foo: 'a'> /;", the output
should be 'a'.

-- 
Tyler Curtis