X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Facic_content%2FtermAcicContent.ml;h=2ce47bb6761f1b953b2c078d994921bc7a3d9031;hb=a3ff8f4f61a45e8c269322275956fad0805da8bc;hp=f3806beea63896e2a3217df528a8806649328832;hpb=cc23f034c9419186602d9250456241f2eba90d7c;p=helm.git diff --git a/helm/software/components/acic_content/termAcicContent.ml b/helm/software/components/acic_content/termAcicContent.ml index f3806beea..2ce47bb67 100644 --- a/helm/software/components/acic_content/termAcicContent.ml +++ b/helm/software/components/acic_content/termAcicContent.ml @@ -42,7 +42,7 @@ type term_info = } let get_types uri = - let o,_ = CicEnvironment.get_obj CicUniv.empty_ugraph uri in + let o,_ = CicEnvironment.get_obj CicUniv.oblivion_ugraph uri in match o with | Cic.InductiveDefinition (l,_,lpsno,_) -> l, lpsno | _ -> assert false