checkpoint

[sbp.git] / tests / meta.g

diff --git a/tests/meta.g b/tests/meta.g
index 884f2aa..7859386 100644 (file)
--- a/tests/meta.g
+++ b/tests/meta.g
@@ -1,4 +1,4 @@
-s         ::=  ws grammar ws                  => "gram"
+s         ::=  grammar ws                  => "gram"

 ws       !::=  w** | w** "//" (~[\n]*) "\n" ws
 wp       !::=  w++
 grammar   ::=  r +/ ws                        => "grammar"
 ws       !::=  w** | w** "//" (~[\n]*) "\n" ws
 wp       !::=  w++
 grammar   ::=  r +/ ws                        => "grammar"

@@ -22,6 +22,7 @@ psx        ::= psy                   => "psy"
              | e "<-" psy "->" e /ws => "psylr"
 sequence   ::= quoted => "qprod"
              > psx
              | e "<-" psy "->" e /ws => "psylr"
 sequence   ::= quoted => "qprod"
              > psx

+             | psx  "=>" ^"[]"         /ws

              | psx ^"=>" (word|quoted) /ws
 
 ec       ::= ~[\-\]\\]
              | psx ^"=>" (word|quoted) /ws
 
 ec       ::= ~[\-\]\\]