]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/cic_unification/cicRefine.ml
Debugging code removed.
[helm.git] / helm / software / components / cic_unification / cicRefine.ml
index 56e010f7bad2a48f8a10793cb1dc5b4052ac185e..b535b9ebe987677505d7d9b40a2c59731a4c2606 100644 (file)
@@ -1967,7 +1967,6 @@ let typecheck metasenv uri obj ~localization_tbl =
  let ugraph = CicUniv.oblivion_ugraph in
  match obj with
     Cic.Constant (name,Some bo,ty,args,attrs) ->
-prerr_endline ("PRIMA: " ^ CicPp.ppobj obj);
      (* CSC: ugly code. Here I need to retrieve in advance the loc of bo
         since type_of_aux' destroys localization information (which are
         preserved by type_of_aux *)