val invalid_arg : ('a, Stdlib.Format.formatter, unit, 'b) Stdlib.format4 -> 'a
val style_renderer : Stdlib.Format.formatter -> [> `Ansi | `None ]
val set_style_renderer : Stdlib.Format.formatter -> [< `Ansi | `None ] -> unit
type style = [
| `None |
| `Style of [ `Fg | `Bg ] * [ standard | bright | bit8 | bit24 | grayscale ] |
]
val ansi_style_code : [< `None | `Style of [< `Bg | `Fg ] * [< `Black | `Blue | `Bright of standard | `Cyan | `Grayscale of int | `Green | `Magenta | `Red | `White | `Yellow | `bit24 of int * int * int | `bit8 of int * int * int ] ] -> string
val styled : [< `None | `Style of [< `Bg | `Fg ] * [< `Black | `Blue | `Bright of standard | `Cyan | `Grayscale of int | `Green | `Magenta | `Red | `White | `Yellow | `bit24 of int * int * int | `bit8 of int * int * int ] ] -> (Stdlib.Format.formatter -> 'a -> unit) -> Stdlib.Format.formatter -> 'a -> unit
val with_buffer : ?like:Stdlib.Format.formatter -> Stdlib.Buffer.t -> Stdlib.Format.formatter
val strf_like : Stdlib.Format.formatter -> ('a, Stdlib.Format.formatter, unit, string) Stdlib.format4 -> 'a