X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fcic_unification%2FcicRefine.ml;h=b535b9ebe987677505d7d9b40a2c59731a4c2606;hb=2bcf927f58bac034b8758173cdbd16cb7475de36;hp=56e010f7bad2a48f8a10793cb1dc5b4052ac185e;hpb=0e1bf8990c7c3100f5c5ca50c99ead4f3858e76f;p=helm.git diff --git a/helm/software/components/cic_unification/cicRefine.ml b/helm/software/components/cic_unification/cicRefine.ml index 56e010f7b..b535b9ebe 100644 --- a/helm/software/components/cic_unification/cicRefine.ml +++ b/helm/software/components/cic_unification/cicRefine.ml @@ -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 *)