aboutsummaryrefslogtreecommitdiffhomepage
path: root/toplevel
diff options
context:
space:
mode:
authorGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2013-12-26 11:19:19 +0100
committerGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2014-01-04 17:07:15 +0100
commit0a6227fe2ccb3f7012aad1b477e7b3f6b9c24da3 (patch)
tree173461a164155dccbe5d3ef07c875367f5c459c3 /toplevel
parentf21fa7e0c205417925e6bf9e563dbb7181fe6bd2 (diff)
Proof_global: Simpler API for proof_terminator
Diffstat (limited to 'toplevel')
-rw-r--r--toplevel/lemmas.ml4
1 files changed, 2 insertions, 2 deletions
diff --git a/toplevel/lemmas.ml b/toplevel/lemmas.ml
index 1421aaeed..ac0dac03f 100644
--- a/toplevel/lemmas.ml
+++ b/toplevel/lemmas.ml
@@ -404,7 +404,7 @@ let start_proof_com kind thms hook =
let save_proof ?proof = function
| Vernacexpr.Admitted ->
- Ephemeron.get (Proof_global.get_terminator()) Proof_global.Admitted
+ Proof_global.get_terminator() Proof_global.Admitted
| Vernacexpr.Proved (is_opaque,idopt) ->
let (proof_obj,terminator) =
match proof with
@@ -413,7 +413,7 @@ let save_proof ?proof = function
in
(* if the proof is given explicitly, nothing has to be deleted *)
if Option.is_empty proof then Pfedit.delete_current_proof ();
- Ephemeron.get terminator (Proof_global.Proved (is_opaque,idopt,proof_obj))
+ terminator (Proof_global.Proved (is_opaque,idopt,proof_obj))
(* Miscellaneous *)