checkpoint
[sbp.git] / tests / testcase.g
index 5212e91..01ce08b 100644 (file)
@@ -1,8 +1,9 @@
-#import tests/meta.g
+#import tests/meta.g as grammar
 
-ts         = ts:: ws! tests ws!
-tests      =      test */ ws
-test       =   tca::   "testcase" "{" input (o::(output +/ ws))   (grammaro::Grammar) "}" /ws
-           |   tcb::   "testcase" "{" input                       (grammaro::Grammar) "}" /ws
-output     =           "output" Quoted ";" /ws
-input      =           "input"  Quoted ";" /ws
+xws         = grammar.ws
+ts         = ts:: xws! tests xws!
+tests      =      test */ xws
+test       =   tca::   "testcase" "{" input (o::(output +/ xws))   (grammaro::grammar.Grammar) "}" /xws
+           |   tcb::   "testcase" "{" input                       (grammaro::grammar.Grammar) "}" /xws
+output     =           "output" grammar.Quoted ";" /xws
+input      =           "input"  grammar.Quoted ";" /xws