Skip to content
Browse files

allow TCLish -foo => bar form

  • Loading branch information...
1 parent b87ea13 commit 942bb1cfc5bf29d1b09bc5ae4fb32c41e9956a74 @TimToady TimToady committed
Showing with 3 additions and 3 deletions.
  1. +3 −3 STD_P5.pm6
View
6 STD_P5.pm6
@@ -823,7 +823,7 @@ token termish {
}
}
-token p5term:fatarrow { <fatarrow> }
+token p5term:fatkey { <fatkey> }
token p5term:variable { <variable>
[
@@ -843,8 +843,8 @@ token p5term:value { <value=p5value> }
token p5term:capterm { <capterm> }
token p5term:statement_prefix { <statement_prefix=p5statement_prefix> }
-token fatarrow {
- <key=identifier> \h* '=>' <.ws> <val=EXPR(item %assignment)>
+token fatkey {
+ '-'?<key=identifier> <?before \h* '=>' >
}
# Most of these special variable rules are there simply to catch old p5 brainos

0 comments on commit 942bb1c

Please sign in to comment.
Something went wrong with that request. Please try again.