sig
val pf :
Format.formatter -> ('a, Format.formatter, unit) Pervasives.format -> 'a
val kpf :
(Format.formatter -> 'a) ->
Format.formatter ->
('b, Format.formatter, unit, 'a) Pervasives.format4 -> 'b
val strf : ('a, Format.formatter, unit, string) Pervasives.format4 -> 'a
val kstrf :
(string -> 'a) ->
('b, Format.formatter, unit, 'a) Pervasives.format4 -> 'b
val strf_like :
Format.formatter ->
('a, Format.formatter, unit, string) Pervasives.format4 -> 'a
val with_buffer : ?like:Format.formatter -> Buffer.t -> Format.formatter
val stdout : Format.formatter
val stderr : Format.formatter
val pr : ('a, Format.formatter, unit) Pervasives.format -> 'a
val epr : ('a, Format.formatter, unit) Pervasives.format -> 'a
type 'a t = Format.formatter -> 'a -> unit
val nop : 'a Fmt.t
val cut : unit Fmt.t
val sp : unit Fmt.t
val const : 'a Fmt.t -> 'a -> unit Fmt.t
val unit : (unit, Format.formatter, unit) Pervasives.format -> unit Fmt.t
val fmt :
('a, Format.formatter, unit) Pervasives.format -> Format.formatter -> 'a
val always : (unit, Format.formatter, unit) Pervasives.format -> 'a Fmt.t
val bool : bool Fmt.t
val int : int Fmt.t
val nativeint : nativeint Fmt.t
val int32 : int32 Fmt.t
val int64 : int64 Fmt.t
val uint : int Fmt.t
val unativeint : nativeint Fmt.t
val uint32 : int32 Fmt.t
val uint64 : int64 Fmt.t
val float : float Fmt.t
val float_dfrac : int -> float Fmt.t
val float_dsig : int -> float Fmt.t
val char : char Fmt.t
val string : string Fmt.t
val buffer : Buffer.t Fmt.t
val pair : ?sep:unit Fmt.t -> 'a Fmt.t -> 'b Fmt.t -> ('a * 'b) Fmt.t
val option : ?none:unit Fmt.t -> 'a Fmt.t -> 'a option Fmt.t
val list : ?sep:unit Fmt.t -> 'a Fmt.t -> 'a list Fmt.t
val array : ?sep:unit Fmt.t -> 'a Fmt.t -> 'a array Fmt.t
val hashtbl :
?sep:unit Fmt.t -> ('a * 'b) Fmt.t -> ('a, 'b) Hashtbl.t Fmt.t
val queue : ?sep:unit Fmt.t -> 'a Fmt.t -> 'a Queue.t Fmt.t
val stack : ?sep:unit Fmt.t -> 'a Fmt.t -> 'a Stack.t Fmt.t
val iter :
?sep:unit Fmt.t -> (('a -> unit) -> 'b -> unit) -> 'a Fmt.t -> 'b Fmt.t
val iter_bindings :
?sep:unit Fmt.t ->
(('a -> 'b -> unit) -> 'c -> unit) -> ('a * 'b) Fmt.t -> 'c Fmt.t
val using : ('a -> 'b) -> 'b Fmt.t -> 'a Fmt.t
module Dump :
sig
val pair : 'a Fmt.t -> 'b Fmt.t -> ('a * 'b) Fmt.t
val option : 'a Fmt.t -> 'a option Fmt.t
val list : 'a Fmt.t -> 'a list Fmt.t
val array : 'a Fmt.t -> 'a array Fmt.t
val hashtbl : 'a Fmt.t -> 'b Fmt.t -> ('a, 'b) Hashtbl.t Fmt.t
val queue : 'a Fmt.t -> 'a Queue.t Fmt.t
val stack : 'a Fmt.t -> 'a Stack.t Fmt.t
val iter :
(('a -> unit) -> 'b -> unit) -> 'b Fmt.t -> 'a Fmt.t -> 'b Fmt.t
val iter_bindings :
(('a -> 'b -> unit) -> 'c -> unit) ->
'c Fmt.t -> 'a Fmt.t -> 'b Fmt.t -> 'c Fmt.t
end
val box : ?indent:int -> 'a Fmt.t -> 'a Fmt.t
val hbox : 'a Fmt.t -> 'a Fmt.t
val vbox : ?indent:int -> 'a Fmt.t -> 'a Fmt.t
val hvbox : ?indent:int -> 'a Fmt.t -> 'a Fmt.t
val parens : 'a Fmt.t -> 'a Fmt.t
val brackets : 'a Fmt.t -> 'a Fmt.t
val braces : 'a Fmt.t -> 'a Fmt.t
val text : string Fmt.t
val lines : string Fmt.t
val text_range : ((int * int) * (int * int)) Fmt.t
val append : 'a Fmt.t -> 'b Fmt.t -> ('a * 'b) Fmt.t
val prefix : unit Fmt.t -> 'a Fmt.t -> 'a Fmt.t
val suffix : unit Fmt.t -> 'a Fmt.t -> 'a Fmt.t
val byte_size : int Fmt.t
val bi_byte_size : int Fmt.t
val if_utf_8 : 'a Fmt.t -> 'a Fmt.t -> 'a Fmt.t
val utf_8 : Format.formatter -> bool
val set_utf_8 : Format.formatter -> bool -> unit
type style =
[ `Black
| `Blue
| `Bold
| `Cyan
| `Green
| `Magenta
| `None
| `Red
| `Underline
| `White
| `Yellow ]
val styled : Fmt.style -> 'a Fmt.t -> 'a Fmt.t
val styled_unit :
Fmt.style ->
(unit, Format.formatter, unit) Pervasives.format -> unit Fmt.t
type style_renderer = [ `Ansi_tty | `None ]
val style_renderer : Format.formatter -> Fmt.style_renderer
val set_style_renderer : Format.formatter -> Fmt.style_renderer -> unit
val of_to_string : ('a -> string) -> 'a Fmt.t
val to_to_string : 'a Fmt.t -> 'a -> string
end