checkpoint
[sbp.git] / tests / meta.g
index 9b24713..a9507ff 100644 (file)
@@ -10,9 +10,9 @@ Conjuncts   ::=  Sequence
 Elements    ::=  e*/ws
 
 psy         ::= Elements => "ps"
-              | psy !wp ^"/" !ws e
+              | psy !wp ^"/"  !ws e
+              | psy     ^"->"     e /ws
 psx         ::= psy                   => "psy"
-              | psy ^"->" e /ws
 Sequence    ::= Quoted => "qprod"
               > psx => "psx"
               | psx  "=>" ^"[]"              /ws