X-Git-Url: http://git.megacz.com/?p=sbp.git;a=blobdiff_plain;f=tests%2Fmeta.g;h=8a5b7e17f3573d7272e103a720bd40ecaa84aa8e;hp=64f18f928cbfeff94633f38e1245cd963acafacd;hb=ad0974ef59fc62ab06a78795a65e68238426edd0;hpb=db06672c282a173556f91f6072c0aec376467024

diff --git a/tests/meta.g b/tests/meta.g
index 64f18f9..8a5b7e1 100644
--- a/tests/meta.g
+++ b/tests/meta.g
@@ -1,5 +1,6 @@
 s         ::=  ws grammar ws                  => "gram"
 ws       !::=  w**
+wp       !::=  w++
 grammar   ::=  r +/ ws                        => "grammar"
 
 r         ::=  word  ^"::=" alternatives /ws
@@ -14,7 +15,7 @@ conjuncts     ::=  sequence
 ps          ::= e*/ws                              => "ps"
               | (e+/ws ws)? "^" quoted (ws e+/ws)? => "ps2"
 psx         ::= ps
-              > ps ^"/" e /ws
+              | ps wp ^"/" ws e
 sequence    ::= psx
               | psx ^"=>" (word|quoted) /ws