aboutsummaryrefslogtreecommitdiff
path: root/ide/coqide/protocol/interface.ml
diff options
context:
space:
mode:
authorJim Fehrle2020-08-23 16:09:10 -0700
committerJim Fehrle2020-10-09 19:25:25 -0700
commit1d4bbefe5fe19306ab415e537863763a0a74134a (patch)
tree5f7b0cdee92b519f312ad338af1ddfc101e643e3 /ide/coqide/protocol/interface.ml
parent6c5608acde0a9bbaa3e2f7317b9b5cf2de2699cd (diff)
Add an XML message for "Show Proof Diffs"
Add menu item that uses this
Diffstat (limited to 'ide/coqide/protocol/interface.ml')
-rw-r--r--ide/coqide/protocol/interface.ml5
1 files changed, 5 insertions, 0 deletions
diff --git a/ide/coqide/protocol/interface.ml b/ide/coqide/protocol/interface.ml
index 646012dcaa..86a81446e8 100644
--- a/ide/coqide/protocol/interface.ml
+++ b/ide/coqide/protocol/interface.ml
@@ -187,6 +187,10 @@ type status_rty = status
type search_sty = search_flags
type search_rty = string coq_object list
+(** Diffs between the proof term at a given stateid and the previous one *)
+type proof_diff_sty = string * Stateid.t
+type proof_diff_rty = Pp.t
+
(** Retrieve the list of options of the current toplevel *)
type get_options_sty = unit
type get_options_rty = (option_name * option_state) list
@@ -252,6 +256,7 @@ type handler = {
stop_worker : stop_worker_sty -> stop_worker_rty;
print_ast : print_ast_sty -> print_ast_rty;
annotate : annotate_sty -> annotate_rty;
+ proof_diff : proof_diff_sty -> proof_diff_rty;
handle_exn : handle_exn_sty -> handle_exn_rty;
init : init_sty -> init_rty;
quit : quit_sty -> quit_rty;