From 07cb010ccd29a586c992ab76c81934979ba1a755 Mon Sep 17 00:00:00 2001 From: Chimrod <> Date: Thu, 7 Dec 2023 18:40:48 +0100 Subject: Removed debug messages --- lib/qparser/lex_state.ml | 9 +-------- 1 file changed, 1 insertion(+), 8 deletions(-) (limited to 'lib/qparser/lex_state.ml') diff --git a/lib/qparser/lex_state.ml b/lib/qparser/lex_state.ml index 3cf757d..4b102b8 100644 --- a/lib/qparser/lex_state.ml +++ b/lib/qparser/lex_state.ml @@ -4,11 +4,6 @@ exception Out_of_context -let pr_err buffer = - let location, _ = Lexbuf.positions buffer in - let line = location.Lexing.pos_lnum and file = location.Lexing.pos_fname in - Format.eprintf "Error found at : %s:%d\n" file line - let space = [%sedlex.regexp? ' ' | '\t'] let spaces = [%sedlex.regexp? Plus space] let single_quote = [%sedlex.regexp? '\''] @@ -108,9 +103,7 @@ and quotedStringWraper : Lexbuf.stringWraper = | single_quote -> Lexbuf.leave_state buffer; TEXT_MARKER - | _ -> - pr_err buffer; - raise Not_found); + | _ -> raise Not_found); } and dQuotedStringWraper : Lexbuf.stringWraper = -- cgit v1.2.3