aboutsummaryrefslogtreecommitdiff
path: root/lib/future.mli
diff options
context:
space:
mode:
authorEnrico Tassi2015-09-28 16:50:25 +0200
committerEnrico Tassi2015-10-08 09:51:13 +0200
commit173f07a8386bf4d3d45b49d3dc01ab047b3ad4f9 (patch)
treea079264767b207b20d5198c3f1c498fbfdd422f0 /lib/future.mli
parent0de499ab4702708ddfae162389617869b170c7d7 (diff)
Future: make not-here/not-ready messages customizable
Diffstat (limited to 'lib/future.mli')
-rw-r--r--lib/future.mli3
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/future.mli b/lib/future.mli
index 324d5f7d10..de2282ae92 100644
--- a/lib/future.mli
+++ b/lib/future.mli
@@ -161,3 +161,6 @@ val print : ('a -> Pp.std_ppcmds) -> 'a computation -> Pp.std_ppcmds
Thy are set for the outermos layer of the system, since they have to
deal with the whole system state. *)
val set_freeze : (unit -> Dyn.t) -> (Dyn.t -> unit) -> unit
+
+val customize_not_ready_msg : (string -> Pp.std_ppcmds) -> unit
+val customize_not_here_msg : (string -> Pp.std_ppcmds) -> unit