diff options
Diffstat (limited to 'lib/analyzer.ml')
| -rw-r--r-- | lib/analyzer.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/analyzer.ml b/lib/analyzer.ml index b422b24..e4fc272 100644 --- a/lib/analyzer.ml +++ b/lib/analyzer.ml @@ -17,7 +17,7 @@ let format_error : Format.formatter -> error -> unit = else Format.fprintf f "Line %d %d:%d %s" start_line start_c end_c e.message (** - Run the QSP parser and apply the analyzer over it. + Run the QSP parser and apply the analyzer over it. See [syntax/S] *) @@ -33,7 +33,7 @@ let parse : Interpreter.Interpreter (Parser.MenhirInterpreter) in fun lexbuf -> IncrementalParser.of_lexbuf lexbuf - (UTF16.lexer (module E)) + (Lexer.lexer (module E)) Parser.Incremental.main |> Result.map_error (fun e -> let message = |