From 8a279dd3b4c7562099933bcb45e386ccc1ca156e Mon Sep 17 00:00:00 2001 From: Ferruccio Guidi Date: Thu, 31 Oct 2002 14:18:37 +0000 Subject: [PATCH] silly debug output removed from stdout --- helm/ocaml/mathql_interpreter/func.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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)) -- 2.39.2