18 lines
480 B
OCaml
18 lines
480 B
OCaml
val colorize : key:string -> string -> string
|
|
|
|
val strip : string -> string
|
|
val stderr_supports_colors : bool Lazy.t
|
|
val setup_env_for_colors : unit Lazy.t
|
|
|
|
(** Strip colors in [not (Lazy.force stderr_supports_colors)] *)
|
|
val strip_colors_for_stderr : string -> string
|
|
|
|
(** Enable the interpretation of color tags for [Format.err_formatter] *)
|
|
val setup_err_formatter_colors : unit -> unit
|
|
|
|
type styles
|
|
|
|
val output_filename : styles
|
|
|
|
val apply_string : styles -> string -> string
|