diff options
author | Enrico Tassi <Enrico.Tassi@inria.fr> | 2018-04-17 11:26:37 +0200 |
---|---|---|
committer | Enrico Tassi <Enrico.Tassi@inria.fr> | 2018-04-17 16:16:42 +0200 |
commit | 04f4321484f9295fdae6669018046feb64922ef9 (patch) | |
tree | e065e5fa3f60068fbc7b8768b087a93a024fd8f2 /stm/stm.mli | |
parent | ed5ec093c216bef6629657f69d7f94256e3ec009 (diff) |
[stm] push functional API further
Diffstat (limited to 'stm/stm.mli')
-rw-r--r-- | stm/stm.mli | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/stm/stm.mli b/stm/stm.mli index 7a720aa72..9d2f2c2d9 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 |