diff options
| author | Maxime Dénès | 2017-07-31 15:26:39 +0200 |
|---|---|---|
| committer | Maxime Dénès | 2017-07-31 15:26:39 +0200 |
| commit | 2f349829c125ed0e2d55548935e7b90e7719f12e (patch) | |
| tree | 2d3003a0072af5ab5f1268c1570b2d83ead70060 /lib/future.mli | |
| parent | 9a872809b246bb6af0c177d530581f7c0c36583f (diff) | |
| parent | e3c247c1d96f39d2c07d120b69598a904b7d9f19 (diff) | |
Merge PR #761: deprecate Pp.std_ppcmds type and promote Pp.t instead
Diffstat (limited to 'lib/future.mli')
| -rw-r--r-- | lib/future.mli | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/future.mli b/lib/future.mli index ce91556572..acfce51a07 100644 --- a/lib/future.mli +++ b/lib/future.mli @@ -154,7 +154,7 @@ val purify : ('a -> 'b) -> 'a -> 'b val transactify : ('a -> 'b) -> 'a -> 'b (** Debug: print a computation given an inner printing function. *) -val print : ('a -> Pp.std_ppcmds) -> 'a computation -> Pp.std_ppcmds +val print : ('a -> Pp.t) -> 'a computation -> Pp.t type freeze (* These functions are needed to get rid of side effects. @@ -162,5 +162,5 @@ type freeze deal with the whole system state. *) val set_freeze : (unit -> freeze) -> (freeze -> unit) -> unit -val customize_not_ready_msg : (string -> Pp.std_ppcmds) -> unit -val customize_not_here_msg : (string -> Pp.std_ppcmds) -> unit +val customize_not_ready_msg : (string -> Pp.t) -> unit +val customize_not_here_msg : (string -> Pp.t) -> unit |