From a7af2f6571d007b6f83a1ec9252b52f69907a965 Mon Sep 17 00:00:00 2001
From: Gaëtan Gilbert
Date: Thu, 30 Jan 2020 23:34:49 +0100
Subject: export_private_constants doesn't use the [constr in_univ_ctx]
 argument

---
 library/global.mli | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'library')

diff --git a/library/global.mli b/library/global.mli
index a38fde41a5..b6bd69c17c 100644
--- a/library/global.mli
+++ b/library/global.mli
@@ -47,8 +47,8 @@ val push_named_def   : (Id.t * Entries.section_def_entry) -> unit
 val push_section_context : (Name.t array * Univ.UContext.t) -> unit
 
 val export_private_constants :
-  Safe_typing.private_constants Entries.proof_output ->
-  Constr.constr Univ.in_universe_context_set * Safe_typing.exported_private_constant list
+  Safe_typing.private_constants ->
+  Safe_typing.exported_private_constant list
 
 val add_constant :
   Id.t -> Safe_typing.global_declaration -> Constant.t
-- 
cgit v1.2.3