From e3c247c1d96f39d2c07d120b69598a904b7d9f19 Mon Sep 17 00:00:00 2001
From: Matej Košík
Date: Sun, 11 Jun 2017 15:14:15 +0200
Subject: deprecate Pp.std_ppcmds type alias

---
 lib/future.mli | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib/future.mli')

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
-- 
cgit v1.2.3