diff options
author | Chimrod <> | 2024-02-04 10:37:04 +0100 |
---|---|---|
committer | Chimrod <> | 2024-02-08 14:12:45 +0100 |
commit | 6fd720c07e3e361932e01bfbdbe4637c8f610649 (patch) | |
tree | 26f983295d8674a08fc9367aaac820c0ace675bc /test/syntax.ml | |
parent | 35ef1827a216a1deb6d15f916ff197b0c75bc83e (diff) |
Added a general context for each test
Diffstat (limited to 'test/syntax.ml')
-rw-r--r-- | test/syntax.ml | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/test/syntax.ml b/test/syntax.ml index 47f1a25..87fe2ab 100644 --- a/test/syntax.ml +++ b/test/syntax.ml @@ -27,7 +27,8 @@ let parse : string -> (S.pos location, Qsp_syntax.Report.t) result = let lexing = Sedlexing.Latin1.from_string content |> Qparser.Lexbuf.from_lexbuf in - Qparser.Analyzer.parse (module Parser) lexing + let context = Parser.initialize () in + Qparser.Analyzer.parse (module Parser) lexing context |> Result.map (fun (location, _report) -> (* Uncatched excteptions here, but we are in the tests… If it’s fail here I have an error in the code. *) |