| word ^"!::=" alternatives /ws
alternatives ::= equiAlt +/ (ws ">" ws)
-equiAlt ::= conjuncts +/ (ws "|" ws) => "alternatives"
-
-sequence ::= es
- > es ws ^"/" e
-es ::= e */ (w**)
-
-ss ::= es | es ^"/" e /ws
+equiAlt ::= conjuncts +/ (ws "|" ws)
conjuncts ::= rewrite
| rewrite ^"&" e*/ws /ws
| rewrite ^"&~" e*/ws /ws
-rewrite ::= sequence /ws => "rewrite"
- | sequence ^"=>" word /ws
- | sequence ^"=>" quoted /ws
- | sequence "=>" "()" /ws => "wrap"
+sequence ::= e*/ws (ws "/" e)? => "seq"
+
+rewrite ::= sequence /ws => "rewrite"
+ | sequence ^"=>" (word|quoted) /ws
ec ::= [~\-\]\\\~]
| escaped
range ::= ec => "range"
| ec ^"-" ec
-e ::= word => "nonTerminalY"
+e ::= word => "nonTerminal"
| [(][)] => "epsilon"
| ^"{" alternatives "}" /ws
| ^"[" (range*) "]"
| ^"[~" (range*) "]"
| ^"^" quoted /ws
- | e ^"~/~" /ws
| ^"!" e /ws
- | ^"`" e /ws
- | e ^"#" /ws
-
| (e ws ^"**" > e ws ^"*")
| e ^"*/" e /ws
| (e ws ^"++" > e ws ^"+")
| "\r"
an ::= [a-zA-Z0-9_]
word ::= an++
-quoted ::= "\"" (([~\"\\] | escaped)*) "\"" => "sify"
+quoted ::= "\"" (([~\"\\] | escaped)+) "\""
+ | "\"\"" => ""
escaped ::= "\\n" => "\n"
| "\\r" => "\r"
| "\\" [~nr]