From: Ferruccio Guidi <ferruccio.guidi@unibo.it>
Date: Thu, 31 Oct 2002 14:18:37 +0000 (+0000)
Subject: silly debug output removed from stdout
X-Git-Tag: BEFORE_METADATA_FOR_SORT_AND_REL~5
X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=8a279dd3b4c7562099933bcb45e386ccc1ca156e;p=helm.git

silly debug output removed from stdout
---

diff --git a/helm/ocaml/mathql_interpreter/func.ml b/helm/ocaml/mathql_interpreter/func.ml
index bd2627629..26b4fa96c 100644
--- 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))