]> matita.cs.unibo.it Git - helm.git/commitdiff
removed a debugging message
authorStefano Zacchiroli <zack@upsilon.cc>
Wed, 4 Feb 2004 09:46:32 +0000 (09:46 +0000)
committerStefano Zacchiroli <zack@upsilon.cc>
Wed, 4 Feb 2004 09:46:32 +0000 (09:46 +0000)
helm/ocaml/cic_unification/cicMkImplicit.ml

index 672c90cd8043ed76c1ff243129eccab1681f7412..1817ac8613873ecd2276fae3da36f156d4afda7e 100644 (file)
@@ -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