X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_transformations%2Fcontent_expressions.ml;h=717b4e925b50eb55c2c88d551b73f7385a5ac3a3;hb=4f52daab3f629aaae5cec7ccd8cc720733a0c13e;hp=f1c648e9bdef5bb847bebda860df0b42f1cfd1b2;hpb=36d9dada5eb3894d96c807781e1056b73a1c0a79;p=helm.git diff --git a/helm/ocaml/cic_transformations/content_expressions.ml b/helm/ocaml/cic_transformations/content_expressions.ml index f1c648e9b..717b4e925 100644 --- a/helm/ocaml/cic_transformations/content_expressions.ml +++ b/helm/ocaml/cic_transformations/content_expressions.ml @@ -78,7 +78,7 @@ Hashtbl.add symbol_table "cic:/Coq/Init/Logic_Type/eqT.ind#xpointer(1/1)" (fun aid sid args acic2cexpr -> Appl (Some aid, (Symbol (Some sid, "eq", - None, Some "cic:/Coq/Init/Logic/eqT.ind")) + None, Some "cic:/Coq/Init/Logic_Type/eqT.ind")) :: List.map acic2cexpr (List.tl args)));; (* and *)