Add *, + and ? to list of non-allowed ebnf identifier characteres

2008-03-20 01:25:57 +13:00 · 2008-03-20 01:25:57 +13:00 · c0b7bdf823
parent 82d54d3776
commit c0b7bdf823
1 changed files with 3 additions and 0 deletions
--- a/extra/peg/ebnf/ebnf.factor
+++ b/extra/peg/ebnf/ebnf.factor
@ -153,6 +153,9 @@ DEFER: 'rhs'
      [ dup CHAR: [ = ]
      [ dup CHAR: . = ]
      [ dup CHAR: ! = ]
+      [ dup CHAR: * = ]
+      [ dup CHAR: + = ]
+      [ dup CHAR: ? = ]
    } || not nip    
  ] satisfy repeat1 [ >string <ebnf-non-terminal> ] action ;