aboutsummaryrefslogtreecommitdiff
path: root/lib/qparser/lex_state.ml
diff options
context:
space:
mode:
authorChimrod <>2023-12-07 18:40:48 +0100
committerChimrod <>2023-12-07 18:40:48 +0100
commit07cb010ccd29a586c992ab76c81934979ba1a755 (patch)
treee5b2e35f372e9c9bebdfeec26f48f871a9af91ce /lib/qparser/lex_state.ml
parent0f7d55c4bccbe49be8a538a36363078d40f1ef1f (diff)
Removed debug messages
Diffstat (limited to 'lib/qparser/lex_state.ml')
-rw-r--r--lib/qparser/lex_state.ml9
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 =