Permalink
Browse files

Import some changes from STD for <longname> and <methodop> to fix par…

…sing of adverbial blocks (fixes RT#53804)
  • Loading branch information...
1 parent dfd1d7a commit b4d862a2d902c1e690d66ab13652f293138889c1 @KrisShannon committed Dec 27, 2011
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/Perl6/Grammar.pm
View
@@ -72,7 +72,7 @@ grammar Perl6::Grammar is HLL::Grammar {
}
token longname {
- <name> <colonpair>*
+ <name> {} [ <?before ':' <[ a..z A..Z _ \< \[ \« ]>> <colonpair> ]*
}
token deflongname {
@@ -2260,7 +2260,7 @@ grammar Perl6::Grammar is HLL::Grammar {
[
[
| <?[(]> <args>
- | ':' \s <!{ $*QSIGIL }> <args=.arglist>
+ | ':' <?before \s | '{'> <!{ $*QSIGIL }> <args=.arglist>
]
|| <!{ $*QSIGIL }> <?>
|| <?{ $*QSIGIL }> <?['.']> <?>

0 comments on commit b4d862a

Please sign in to comment.