diff options
| author |  Maxime Dénès <mail@maximedenes.fr> | 2016-01-15 17:49:49 +0100 |
|---|---|---|
| committer | Maxime Dénès <mail@maximedenes.fr> | 2016-01-15 17:49:49 +0100 |
| commit | 74a5cfa8b2f1a881ebf010160421cf0775c2a084 (patch) | |
| tree | 60444d73bc9f0824920b34d60b60b6721a603e92 /stm/stm.mli | |
| parent | 088977e086a5fd72f5f724192e5cb5ba1a0d9bb6 (diff) | |
Hooks for a third-party XML plugin. Contributed by Claudio Sacerdoti Coen.
Diffstat (limited to 'stm/stm.mli')
| -rw-r--r-- | stm/stm.mli | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/stm/stm.mli b/stm/stm.mli index 0c05c93d4..ad89eb71f 100644 --- a/stm/stm.mli +++ b/stm/stm.mli @@ -107,6 +107,9 @@ val execution_error_hook : (Stateid.t -> Loc.t -> Pp.std_ppcmds -> unit) Hook.t val unreachable_state_hook : (Stateid.t -> Exninfo.iexn -> unit) Hook.t (* ready means that master has it at hand *) val state_ready_hook : (Stateid.t -> unit) Hook.t +(* called with true before and with false after a tactic explicitly + * in the document is run *) +val tactic_being_run_hook : (bool -> unit) Hook.t (* Messages from the workers to the master *) val forward_feedback_hook : (Feedback.feedback -> unit) Hook.t |