diff options
Diffstat (limited to 'test/qsp_parser_test.ml')
| -rw-r--r-- | test/qsp_parser_test.ml | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/test/qsp_parser_test.ml b/test/qsp_parser_test.ml index 6bf249d..25619b7 100644 --- a/test/qsp_parser_test.ml +++ b/test/qsp_parser_test.ml @@ -12,7 +12,12 @@ let parse : string -> T.pos location = fun content -> let lexing = Sedlexing.Latin1.from_string content in - match Qparser.Analyzer.parse (module Qsp_syntax.Tree) lexing with + match + Qparser.Analyzer.parse + (module Qsp_syntax.Tree) + (module Sedlexing.Utf8) + lexing + with | Ok e -> e | Error e -> let msg = Format.asprintf "%a" Qparser.Analyzer.format_error e in |