From 5dc0c5defdd7ebb152a00e8b2895787b54931779 Mon Sep 17 00:00:00 2001 From: Chimrod <> Date: Wed, 27 Sep 2023 15:36:13 +0200 Subject: Allow differents file encoding for the source --- test/qsp_parser_test.ml | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'test/qsp_parser_test.ml') 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 -- cgit v1.2.3