From 84cbc09bd1400f732a6c70e8a840e4c13d018478 Mon Sep 17 00:00:00 2001 From: Matthieu Sozeau Date: Thu, 17 Oct 2013 14:55:57 +0200 Subject: Correct rebase on STM code. Thanks to E. Tassi for help on dealing with latent universes. Now the universes in the type of a definition/lemma are eagerly added to the environment so that later proofs can be checked independently of the original (delegated) proof body. - Fixed firstorder, ring to work correctly with universe polymorphism. - Changed constr_of_global to raise an anomaly if side effects would be lost by turning a polymorphic constant into a constr. - Fix a non-termination issue in solve_evar_evar. - --- library/global.mli | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'library/global.mli') diff --git a/library/global.mli b/library/global.mli index b6825ffa5..410be961b 100644 --- a/library/global.mli +++ b/library/global.mli @@ -108,7 +108,8 @@ val join_safe_environment : unit -> unit val is_polymorphic : Globnames.global_reference -> bool -(* val type_of_global : Globnames.global_reference -> types Univ.in_universe_context_set *) +val type_of_global_in_context : Environ.env -> + Globnames.global_reference -> Constr.types Univ.in_universe_context val type_of_global_unsafe : Globnames.global_reference -> Constr.types (** {6 Retroknowledge } *) -- cgit v1.2.3