checkpoint
[sbp.git] / tests / meta.g
index 019d5e3..3227dca 100644 (file)
@@ -9,8 +9,7 @@ Conjuncts   ::=  Sequence
               |  Sequence ^"&~" Elements  /ws
 Elements    ::=  e*/ws
 
-psy         ::= Elements             => "ps"
-              | Elements !wp "/" !ws e => "ps2"
+psy         ::= Elements (!wp "/" !ws e)? => "ps2"
 psx         ::= psy                   => "psy"
               | psy ^"->" e /ws
 Sequence    ::= Quoted => "qprod"