aboutsummaryrefslogtreecommitdiffhomepage
path: root/lib/pp.mli
diff options
context:
space:
mode:
authorGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2016-10-12 21:54:05 +0200
committerGravatar Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>2016-10-12 21:54:05 +0200
commit376b54ff8753496a54fb120e35cd1b8babb44ac9 (patch)
treeb55be0ecb60aae1a413fd7b275ccf8e32a76f1ca /lib/pp.mli
parentd873f82c5024a496e8f1a14a9839e7f377d5f4bb (diff)
parente1f25889f88e078dac0f3b454eb16a470dd5f9ae (diff)
Merge PR #224 into v8.6
Diffstat (limited to 'lib/pp.mli')
-rw-r--r--lib/pp.mli6
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/pp.mli b/lib/pp.mli
index f607e99db..8342a983d 100644
--- a/lib/pp.mli
+++ b/lib/pp.mli
@@ -172,8 +172,8 @@ val pr_loc : Loc.t -> std_ppcmds
(** FIXME: These ignore the logging settings and call [Format] directly *)
type tag_handler = Tag.t -> Format.tag
-(** [msg_with fmt pp] Print [pp] to [fmt] and flush [fmt] *)
-val msg_with : Format.formatter -> std_ppcmds -> unit
+(** [msg_with ?pp_tag fmt pp] Print [pp] to [fmt] and flush [fmt] *)
+val msg_with : ?pp_tag:tag_handler -> Format.formatter -> std_ppcmds -> unit
-(** [msg_with fmt pp] Print [pp] to [fmt] and don't flush [fmt] *)
+(** [msg_with ?pp_tag fmt pp] Print [pp] to [fmt] and don't flush [fmt] *)
val pp_with : ?pp_tag:tag_handler -> Format.formatter -> std_ppcmds -> unit