From bf578ad5e2f63b7a36aeaef5e0597101db1bd24a Mon Sep 17 00:00:00 2001 From: gregoire Date: Fri, 2 Dec 2005 10:01:15 +0000 Subject: Changement des named_context Ajout de cast indiquant au kernel la strategie a suivre Resolution du bug sur les coinductifs git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@7639 85f007b7-540e-0410-9357-904b9bb8a0f7 --- kernel/declarations.ml | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'kernel/declarations.ml') diff --git a/kernel/declarations.ml b/kernel/declarations.ml index 9ce9252073..82864bbe4c 100644 --- a/kernel/declarations.ml +++ b/kernel/declarations.ml @@ -20,6 +20,9 @@ open Mod_subst (* This module defines the types of global declarations. This includes global constants/axioms and mutual inductive definitions *) +type engagement = ImpredicativeSet + + (*s Constants (internal representation) (Definition/Axiom) *) type constr_substituted = constr substituted @@ -191,3 +194,4 @@ and module_body = mod_type : module_type_body; mod_equiv : module_path option; mod_constraints : constraints } + -- cgit v1.2.3