From 3ef7797ef6fc605dfafb32523261fe1b023aeecb Mon Sep 17 00:00:00 2001 From: Samuel Mimram Date: Fri, 28 Apr 2006 14:59:16 +0000 Subject: Imported Upstream version 8.0pl3+8.1alpha --- kernel/safe_typing.mli | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) (limited to 'kernel/safe_typing.mli') diff --git a/kernel/safe_typing.mli b/kernel/safe_typing.mli index b973fcde..148a9d9d 100644 --- a/kernel/safe_typing.mli +++ b/kernel/safe_typing.mli @@ -6,7 +6,7 @@ (* * GNU Lesser General Public License Version 2.1 *) (************************************************************************) -(*i $Id: safe_typing.mli,v 1.33.2.2 2005/11/23 14:46:08 barras Exp $ i*) +(*i $Id: safe_typing.mli 7639 2005-12-02 10:01:15Z gregoire $ i*) (*i*) open Names @@ -28,7 +28,6 @@ type safe_environment val env_of_safe_env : safe_environment -> Environ.env val empty_environment : safe_environment - val is_empty : safe_environment -> bool (* Adding and removing local declarations (Local or Variables) *) @@ -46,7 +45,7 @@ type global_declaration = val add_constant : dir_path -> label -> global_declaration -> safe_environment -> - kernel_name * safe_environment + constant * safe_environment (* Adding an inductive type *) val add_mind : @@ -68,7 +67,7 @@ val add_constraints : Univ.constraints -> safe_environment -> safe_environment (* Settin the strongly constructive or classical logical engagement *) -val set_engagement : Environ.engagement -> safe_environment -> safe_environment +val set_engagement : engagement -> safe_environment -> safe_environment (*s Interactive module functions *) -- cgit v1.2.3