X-Git-Url: http://git.megacz.com/?p=sbp.git;a=blobdiff_plain;f=tests%2Fmeta.g;h=c89fae1edb27d99061ae7a0da3a0a7f2d1e3613b;hp=3c191d41722a1dcd6cc935bc34b50cdad8b97025;hb=81b213c3a4345486c2f96f1c44e93d4e38134102;hpb=ba93ca53361ed2f7e542ab78fcb3df86597dd9e5 diff --git a/tests/meta.g b/tests/meta.g index 3c191d4..c89fae1 100644 --- a/tests/meta.g +++ b/tests/meta.g @@ -1,18 +1,18 @@ s ::= ws grammar ws => "gram" ws !::= w** -grammar ::= r+/ws => "grammar" +grammar ::= r$$ws => "grammar" r ::= word ^"::=" alternatives /ws | word ^"!::=" alternatives /ws ec ::= [~\]\\\-\~] | escaped -alternatives ::= equiAlt +/ (ws ">" ws) -equiAlt ::= conjuncts +/ (ws "|" ws) => "alternatives" +alternatives ::= equiAlt $$ (ws ">" ws) +equiAlt ::= conjuncts $$ (ws "|" ws) => "alternatives" sequence ::= Es > Es ^"/" e /ws Es ::= e+ -es ::= e+/ws +es ::= e$$ws conjuncts ::= rewrite @@ -31,7 +31,6 @@ e ::= word => "nonTerminalY" | [(][)] => "epsilon" | ^"{" alternatives "}" /ws | "[" [\~]? range* "]" => "range" - | e ^"+/" e /ws | e ^"%%" e /ws | e ^"$$" e /ws | e ^"?" /ws