aboutsummaryrefslogtreecommitdiffhomepage
path: root/stm/stm.mli
diff options
context:
space:
mode:
authorGravatar Emilio Jesus Gallego Arias <e+git@x80.org>2018-04-18 16:49:41 +0200
committerGravatar Emilio Jesus Gallego Arias <e+git@x80.org>2018-04-18 16:49:41 +0200
commit7a9e508e600479e69c5eb82b1ad00979ad76e4a0 (patch)
treeb5d30b94c67edf6165fd7baebaa42cfeabced086 /stm/stm.mli
parent236182069946d603d90709277c3c9f9f0b747720 (diff)
parent04f4321484f9295fdae6669018046feb64922ef9 (diff)
Merge PR #7281: [stm] push functional API further
Diffstat (limited to 'stm/stm.mli')
-rw-r--r--stm/stm.mli7
1 files changed, 4 insertions, 3 deletions
diff --git a/stm/stm.mli b/stm/stm.mli
index 35ce77a38..aed7274d0 100644
--- a/stm/stm.mli
+++ b/stm/stm.mli
@@ -263,11 +263,12 @@ val register_proof_block_delimiter :
* the alternative toploop for the worker can be selected by changing
* the name of the Task(s) above) *)
-val state_computed_hook : (Stateid.t -> in_cache:bool -> unit) Hook.t
-val unreachable_state_hook : (Stateid.t -> Exninfo.iexn -> unit) Hook.t
+val state_computed_hook : (doc:doc -> Stateid.t -> in_cache:bool -> unit) Hook.t
+val unreachable_state_hook :
+ (doc:doc -> Stateid.t -> Exninfo.iexn -> unit) Hook.t
(* ready means that master has it at hand *)
-val state_ready_hook : (Stateid.t -> unit) Hook.t
+val state_ready_hook : (doc:doc -> Stateid.t -> unit) Hook.t
(* Messages from the workers to the master *)
val forward_feedback_hook : (Feedback.feedback -> unit) Hook.t