checkpoint
[sbp.git] / tests / meta.g
index c9f53a2..e7f3524 100644 (file)
@@ -12,10 +12,9 @@ Elements    ::=  e*/ws
 psy         ::= Elements => "ps"
               | psy !wp ^"/"  !ws e
               | psy     ^"->"     e /ws
+              | psy "=>" ("[]"|"()"|word|Quoted) /ws => goo
 Sequence    ::= Quoted => "qprod"
-              > psy => "psx"
-              | psy  "=>" ^"[]"              /ws
-              | psy ^"=>" ("()"|word|Quoted) /ws
+              > psy    => "psx"
 
 ec          ::= ~[\-\]\\]
               | escaped