silly debug output removed from stdout

diff --git a/helm/ocaml/mathql_interpreter/func.ml b/helm/ocaml/mathql_interpreter/func.ml
index bd262762952c47b229a6a1c332b078446f039494..26b4fa96c8fcfacd64df5a0983d5c3e4f649d6d6 100644 (file)
--- a/helm/ocaml/mathql_interpreter/func.ml
+++ b/helm/ocaml/mathql_interpreter/func.ml
@@ -39,7 +39,7 @@ let rec fun_ex tab = function
   | s::tl -> let res =
              let c = pgc () in
             let q = ("select objectName.uri from objectName where objectName.value = '" ^ s ^ "'") in
-            print_endline ("@@@@LA QUERY E': " ^ q);
+(*          print_endline ("@@@@LA QUERY E': " ^ q); *)
             pgresult_to_string_list (c#exec q)
              in
              append (res,(fun_ex tab tl))