diff options
author | 2013-12-26 11:19:19 +0100 | |
---|---|---|
committer | 2014-01-04 17:07:15 +0100 | |
commit | 0a6227fe2ccb3f7012aad1b477e7b3f6b9c24da3 (patch) | |
tree | 173461a164155dccbe5d3ef07c875367f5c459c3 /toplevel | |
parent | f21fa7e0c205417925e6bf9e563dbb7181fe6bd2 (diff) |
Proof_global: Simpler API for proof_terminator
Diffstat (limited to 'toplevel')
-rw-r--r-- | toplevel/lemmas.ml | 4 |
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 *) |