diff options
author | Chimrod <> | 2023-12-07 18:40:48 +0100 |
---|---|---|
committer | Chimrod <> | 2023-12-07 18:40:48 +0100 |
commit | 07cb010ccd29a586c992ab76c81934979ba1a755 (patch) | |
tree | e5b2e35f372e9c9bebdfeec26f48f871a9af91ce /lib/qparser/lex_state.ml | |
parent | 0f7d55c4bccbe49be8a538a36363078d40f1ef1f (diff) |
Removed debug messages
Diffstat (limited to 'lib/qparser/lex_state.ml')
-rw-r--r-- | lib/qparser/lex_state.ml | 9 |
1 files changed, 1 insertions, 8 deletions
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 = |