]> matita.cs.unibo.it Git - helm.git/commitdiff
removed spurious debugging prints
authorStefano Zacchiroli <zack@upsilon.cc>
Wed, 20 Apr 2005 08:54:29 +0000 (08:54 +0000)
committerStefano Zacchiroli <zack@upsilon.cc>
Wed, 20 Apr 2005 08:54:29 +0000 (08:54 +0000)
helm/searchEngine/searchEngine.ml

index 341ace5cc625a6200fa9f2a51af66e31bc4fbaec..f6e81e2d8aed36998c04503efe15ce7ca7f28052 100644 (file)
@@ -314,7 +314,6 @@ let exec_action dbd (req: Http_types.request) outchan =
   in
   let module Disambiguate' = Disambiguate.Make(Chat) in
   let ast = CicTextualParser2.parse_term (Stream.of_string term_str) in
-  prerr_endline "prima della disambiguazione";
   let (id_to_uris, metasenv, term) =
     match
       Disambiguate'.disambiguate_term dbd context metasenv ast id_to_uris
@@ -322,7 +321,6 @@ let exec_action dbd (req: Http_types.request) outchan =
     | [id_to_uris,metasenv,term,_] -> id_to_uris,metasenv,term
     | _ -> assert false
   in
-  prerr_endline "dopo la disambiguazione";
   let uris =
     match req#path with
     | "/match" -> MetadataQuery.match_term ~dbd term