checkpoint

[sbp.git] / tests / meta.g

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