X-Git-Url: http://git.megacz.com/?p=sbp.git;a=blobdiff_plain;f=tests%2Ftestcase.g;h=b25251d24a1e2616aa085099874f351e0ab137d1;hp=2491600ea0eb3e8536accef2298615ea5dec7fc8;hb=HEAD;hpb=9773bb358e8010b24cc487f7cae19edcf8aea5d0 diff --git a/tests/testcase.g b/tests/testcase.g index 2491600..b25251d 100644 --- a/tests/testcase.g +++ b/tests/testcase.g @@ -1,9 +1,12 @@ -#import meta.g as grammar - +#import ../src/edu/berkeley/sbp/meta/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 + (^"ignore output;" | Outputs) + (SubGrammar:: grammar.Grammar) + "}" /ws ws = grammar.ws -ts = ts:: ws! tests ws! -tests = test */ ws -test = tca:: "testcase" "{" input (o::(output +/ ws)) (grammaro::grammar.Grammar) "}" /ws - | tcb:: "testcase" "{" input (grammaro::grammar.Grammar) "}" /ws -output = "output" grammar.Quoted ";" /ws -input = "input" grammar.Quoted ";" /ws