Permalink
Browse files

Rakudo now has after in regexes

  • Loading branch information...
tadzik committed Aug 4, 2012
1 parent bf9cf97 commit c0f8dc15284e66126fb353436553960e15eb8575
Showing with 1 addition and 5 deletions.
  1. +1 −5 lib/Yapsi.pm
View
@@ -27,11 +27,7 @@ grammar Yapsi::Perl6::Grammar {
<.ws> <statementlist> <.ws> '}' }
regex statementlist { <statement> +% <eat_terminator> }
token statement { <statement_control> || <expression> || '' }
- # RAKUDO: <?after '}'> NYRI [perl #76894]
- regex eat_terminator { <?{ $/.CURSOR.pos > 0
- && $_PROGRAM.substr($/.CURSOR.pos - 1, 1) eq '}'
- }> \n
- || <.ws> ';' }
+ regex eat_terminator { <?after '}'> \n || <.ws> ';' }
token statement_control { <statement_control_if>
|| <statement_control_unless>
|| <statement_control_while>

0 comments on commit c0f8dc1

Please sign in to comment.