From ecb032467557631ea60324c6afa55c91c133e40d Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Fri, 17 Jun 2016 20:26:35 +0200 Subject: Reuse the typing_flags datatype for inductives. --- kernel/environ.mli | 1 + 1 file changed, 1 insertion(+) (limited to 'kernel/environ.mli') diff --git a/kernel/environ.mli b/kernel/environ.mli index 0edcb34de..b5e576435 100644 --- a/kernel/environ.mli +++ b/kernel/environ.mli @@ -53,6 +53,7 @@ val engagement : env -> engagement val typing_flags : env -> typing_flags val is_impredicative_set : env -> bool val type_in_type : env -> bool +val deactivated_guard : env -> bool (** is the local context empty *) val empty_context : env -> bool -- cgit v1.2.3