aboutsummaryrefslogtreecommitdiff
path: root/proofs/proof.ml
diff options
context:
space:
mode:
authorMaxime Dénès2017-12-01 09:25:56 +0100
committerMaxime Dénès2017-12-01 09:25:56 +0100
commit895900eb4c3f030e9490d211a4969de933ec2f9b (patch)
treec4d454c201276b0953fe3383c46f76423c8ab515 /proofs/proof.ml
parente29993c250164b9486d4d7ffdebb9bfee4a2828f (diff)
parenta41f8601655f69e71b621dba192342ed0e1f8ec2 (diff)
Merge PR #6233: [proof] [api] Rename proof types in preparation for functionalization.
Diffstat (limited to 'proofs/proof.ml')
-rw-r--r--proofs/proof.ml4
1 files changed, 3 insertions, 1 deletions
diff --git a/proofs/proof.ml b/proofs/proof.ml
index 413b5fdd7e..04e707cd66 100644
--- a/proofs/proof.ml
+++ b/proofs/proof.ml
@@ -98,7 +98,7 @@ let done_cond ?(loose_end=false) k = CondDone (loose_end,k)
(* Subpart of the type of proofs. It contains the parts of the proof which
are under control of the undo mechanism *)
-type proof = {
+type t = {
(* Current focused proofview *)
proofview: Proofview.proofview;
(* Entry for the proofview *)
@@ -115,6 +115,8 @@ type proof = {
initial_euctx : UState.t
}
+type proof = t
+
(*** General proof functions ***)
let proof p =