X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic_annotations%2FcicXPath.ml;h=f2cb0ed409e4316155ab5036b0f868bbde9eea32;hb=0373aa12449568c5aca2027d8e8773ea0c0fa4a5;hp=eef9880bcfb6eef4aa6acd674a5a3418735a3078;hpb=b57c31a1593872c181249135bc05ebd9a72f523b;p=helm.git diff --git a/helm/ocaml/cic_annotations/cicXPath.ml b/helm/ocaml/cic_annotations/cicXPath.ml index eef9880bc..f2cb0ed40 100644 --- a/helm/ocaml/cic_annotations/cicXPath.ml +++ b/helm/ocaml/cic_annotations/cicXPath.ml @@ -76,7 +76,6 @@ let get_ids_to_targets annobj = set_target id (C.Term t) ; List.iter add_target_term l | C.AConst (id,_,_) - | C.AAbst (id,_) | C.AMutInd (id,_,_,_) | C.AMutConstruct (id,_,_,_,_) -> set_target id (C.Term t)