debug output removed

diff --git a/helm/ocaml/mathql/mQueryTLexer.mll b/helm/ocaml/mathql/mQueryTLexer.mll
index 5dbb3d1b9641aa44c02ab43c89b40a0c0dd69adb..60c561fb5783b4e144b667449d900a372dc15880 100644 (file)
--- a/helm/ocaml/mathql/mQueryTLexer.mll
+++ b/helm/ocaml/mathql/mQueryTLexer.mll
@@ -36,7 +36,7 @@
 { 
    open MQueryTParser
    
-   let debug = true
+   let debug = false
    
    let out s = if debug then prerr_endline s
 }
@@ -53,7 +53,7 @@ rule comm_token = parse
 and string_token = parse
    | '"'         { DQ  }
    | '\\' _      { STR (String.sub (Lexing.lexeme lexbuf) 1 1) }
-   | QSTR        { prerr_endline "STR"; STR (Lexing.lexeme lexbuf) }
+   | QSTR        { STR (Lexing.lexeme lexbuf) }
    | eof         { EOF }
 and query_token = parse
    | "(*"        { comm_token lexbuf }