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

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

(limited to 'kernel/safe_typing.mli')

diff --git a/kernel/safe_typing.mli b/kernel/safe_typing.mli
index 92bbd264fa..c879481c66 100644
--- a/kernel/safe_typing.mli
+++ b/kernel/safe_typing.mli
@@ -84,8 +84,8 @@ type side_effect_declaration =
 type exported_private_constant = Constant.t
 
 val export_private_constants :
-  private_constants Entries.proof_output ->
-  (Constr.constr Univ.in_universe_context_set * exported_private_constant list) safe_transformer
+  private_constants ->
+  exported_private_constant list safe_transformer
 
 (** returns the main constant *)
 val add_constant :
-- 
cgit v1.2.3