diff options
| author |  Emilio Jesus Gallego Arias <e+git@x80.org> | 2017-11-13 19:03:03 +0100 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias <e+git@x80.org> | 2017-11-13 19:03:03 +0100 |
| commit | ed0c434a05a929a659e43aed80ab7c8179a7daa3 (patch) | |
| tree | d486bf54f6bbfd6ace8dc9cea52b959699f88ebe /proofs/proof_global.ml | |
| parent | c571cdbbcac5cb4b4a5a19ab2f7ac51222316292 (diff) | |
[api] Insert miscellaneous API deprecation back to core.
Diffstat (limited to 'proofs/proof_global.ml')
| -rw-r--r-- | proofs/proof_global.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/proofs/proof_global.ml b/proofs/proof_global.ml index 8b788bb38..fdc9a236b 100644 --- a/proofs/proof_global.ml +++ b/proofs/proof_global.ml @@ -68,7 +68,7 @@ let _ = (* Extra info on proofs. *) type lemma_possible_guards = int list list -type proof_universes = Evd.evar_universe_context * Universes.universe_binders option +type proof_universes = UState.t * Universes.universe_binders option type proof_object = { id : Names.Id.t; @@ -320,7 +320,7 @@ let constrain_variables init uctx = let levels = Univ.Instance.levels (Univ.UContext.instance init) in UState.constrain_variables levels uctx -type closed_proof_output = (Constr.t * Safe_typing.private_constants) list * Evd.evar_universe_context +type closed_proof_output = (Constr.t * Safe_typing.private_constants) list * UState.t let close_proof ~keep_body_ucst_separate ?feedback_id ~now (fpl : closed_proof_output Future.computation) = |