From bedaec8452d0600ede52efeeac016c9d323c66de Mon Sep 17 00:00:00 2001 From: herbelin Date: Wed, 18 Oct 2000 14:37:44 +0000 Subject: Renommage canonique : declaration = definition | assumption mode de reference = named | rel Ex: push_named_decl : named_declaration -> env -> env lookup_named : identifier -> safe_environment -> constr option * typed_type add_named_assum : identifier * typed_type -> named_context -> named_context add_named_def : identifier*constr*typed_type -> named_context -> named_context git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@723 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/evd.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'kernel/evd.ml') diff --git a/kernel/evd.ml b/kernel/evd.ml index b482f94538..64602f870c 100644 --- a/kernel/evd.ml +++ b/kernel/evd.ml @@ -65,7 +65,7 @@ let is_defined sigma ev = let info = map sigma ev in not (info.evar_body = Evar_empty) -let evar_hyps ev = var_context ev.evar_env +let evar_hyps ev = named_context ev.evar_env let evar_body ev = ev.evar_body let id_of_existential ev = -- cgit v1.2.3