1 // use 'a'-'z' or 'a-z' instead of [a-z]?
3 // #include (with renaming?)
7 Grammar = NonTerminal +/ ws
9 NonTerminal = Word "=" RHS /ws
10 | Word "*" ws! ^"=" ws! RHS
12 RHS = (Sequence +/ (ws! "|" ws!)) +/ (ws! ">" ws!)
16 PreSequence = Elements
17 | (Quoted|Word) ^"::" PreSequence /ws
18 > PreSequence ^"/" e /ws
19 | PreSequence ^"->" e /ws
21 Sequence = psx:: PreSequence
22 | Sequence ^"&" Elements /ws
23 | Sequence ^"&~" Elements /ws
31 e = (Quoted|Word) ^":" e
32 > NonTerminalReference
35 | ^"{" PreSequence "}" /ws
51 NonTerminalReference = Word
54 Quoted = "\"" ((~[\"\\] | escaped)+) "\""
58 escaped = "\n":: "\\n"
64 | "()":: w** "//" (~[\n])* "\n" ws