From eb899bba1d595fafbf1f719991cc8a5710996340 Mon Sep 17 00:00:00 2001 From: Stefano Zacchiroli Date: Wed, 4 Feb 2004 09:46:32 +0000 Subject: [PATCH] removed a debugging message --- helm/ocaml/cic_unification/cicMkImplicit.ml | 1 - 1 file changed, 1 deletion(-) diff --git a/helm/ocaml/cic_unification/cicMkImplicit.ml b/helm/ocaml/cic_unification/cicMkImplicit.ml index 672c90cd8..1817ac861 100644 --- a/helm/ocaml/cic_unification/cicMkImplicit.ml +++ b/helm/ocaml/cic_unification/cicMkImplicit.ml @@ -142,7 +142,6 @@ let expand_implicits metasenv context term = List.fold_right (fun (name, _, typ, _) (metasenv, types) -> let new_metasenv, new_type = aux metasenv context typ in -prerr_endline ("UH? " ^ CicPp.ppterm typ ^ " ==> " ^ CicPp.ppterm new_type) ; (new_metasenv, (name, new_type) :: types)) funs (metasenv, []) in -- 2.39.2