Skip to content

Commit 7f35fa5

Browse files
committed
update documented Util interface with optional init_cmd
1 parent 50eee26 commit 7f35fa5

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

lib/util.mli

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -28,13 +28,15 @@ val print_triple_vertical :
2828
?fig_indent:int ->
2929
?res_width:int ->
3030
?center_prefix:bool ->
31+
?init_cmd:string ->
3132
('a -> string) -> 'a list * 'a list * 'a list -> string
3233
(** [print_triple_vertical pr (xs,ys,zs)] returns a string representing a
3334
parallel trace, with [xs] printed first, and then [ys] and [zs] printed
3435
in parallel.
3536
Optional [fig_indent] indicates how many spaces it should be indented (default: 10 spaces).
3637
Optional [res_width] specifies the reserved width for printing each list entry (default: 20 chars).
3738
Optional [center_prefix] centers the sequential prefix if [true] (the default) and otherwise left-adjust it.
39+
Optional [init_cmd] indicates a string-rendered, initial command.
3840
*)
3941

4042
val protect : ('a -> 'b) -> 'a -> ('b, exn) result

0 commit comments

Comments
 (0)