From: Claudio Sacerdoti Coen Date: Sat, 19 Nov 2005 15:38:19 +0000 (+0000) Subject: Wrong reported error message fixed. X-Git-Tag: V_0_7_2_3~27 X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=commitdiff_plain;h=f5916a7ca7e58c6a3617531e8dbba81d018eb024;p=helm.git Wrong reported error message fixed. --- diff --git a/helm/ocaml/cic_disambiguation/disambiguate.ml b/helm/ocaml/cic_disambiguation/disambiguate.ml index 8f2747a7d..de3701e23 100644 --- a/helm/ocaml/cic_disambiguation/disambiguate.ml +++ b/helm/ocaml/cic_disambiguation/disambiguate.ml @@ -89,7 +89,7 @@ let refine_obj metasenv context uri obj ugraph = | CicRefine.RefineFailure msg -> debug_print (lazy (sprintf "PRUNED!!!\nterm%s\nmessage:%s" (CicPp.ppobj obj) (Lazy.force msg))) ; - Ko (lazy ("Uncertain trying to refine: " ^ CicPp.ppobj obj ^ "\n" ^ Lazy.force msg)),ugraph + Ko (lazy ("Error trying to refine: " ^ CicPp.ppobj obj ^ "\n" ^ Lazy.force msg)),ugraph let resolve (env: codomain_item Environment.t) (item: domain_item) ?(num = "") ?(args = []) () = try