X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=tests%2Ftestcase.g;h=0308ad68ce06a9c12881dd2faed3dc0fb0035223;hb=eaa3114f9dbf4e0d3431da50791b9d3199f445be;hp=10ee5ee6933a5ba5b7243ed322e342d27b94d6ff;hpb=62b32452b9e26b282d61b44b829abb8c38ad31b7;p=sbp.git diff --git a/tests/testcase.g b/tests/testcase.g index 10ee5ee..0308ad6 100644 --- a/tests/testcase.g +++ b/tests/testcase.g @@ -1,6 +1,12 @@ -ts ::= ws test*/ws ws => ts -ws !::= w* -test ::= ^"testcase" "{" input output+/ws Grammar "}" /ws - | ^"testcase" "{" input Grammar "}" /ws -output ::= "output" quoted ";" /ws -input ::= "input" quoted ";" /ws +#import meta.g as grammar +// this is a testx +s = ws! (TestCases:: TestCase */ ws) ws! +Input = "input" grammar.Quoted ";" /ws +Output = "output" grammar.Quoted ";" /ws +Outputs:: = Output */ ws +TestCase:: = "testcase" grammar.Quoted "{" + Input + Outputs + (SubGrammar:: grammar.Grammar) + "}" /ws +ws = grammar.ws