checkpoint

[sbp.git] / tests / meta.g

diff --git a/tests/meta.g b/tests/meta.g
index f414867..956711b 100644 (file)
--- a/tests/meta.g
+++ b/tests/meta.g
@@ -12,15 +12,14 @@ RHS           =  (Sequence +/ (ws! "|" ws!)) +/ (ws! ">" ws!)
 
 Elements      =  e*/ws
 
-PreSequence   =  PS
+PreSequence   =  Elements
               |  (Quoted|Word)   ^"::" PreSequence /ws
               >  PreSequence     ^"/"      e       /ws
               |  PreSequence     ^"->"     e       /ws
-PS            = Elements
 
 Sequence      = psx:: PreSequence
-              |       Sequence ^"&"  PS /ws
-              |       Sequence ^"&~" PS /ws
+              |       Sequence ^"&"  Elements /ws
+              |       Sequence ^"&~" Elements /ws
 
 ec            = ~[\-\]\\]
               | escaped