Module
Color
:
sig end
type color
=
| Black
| Red
| Green
| Yellow
| Blue
| Magenta
| Cyan
| White
type style
=
| FG
of
color
| BG
of
color
| Bold
| Reset
val ansi_of_style_l : style list -> string
type styles
= {
error :
style list
;
warning :
style list
;
loc :
style list
;
}
val default_styles : styles
val get_styles : unit -> styles
val set_styles : styles -> unit
type setting
=
| Auto
| Always
| Never
val setup : setting option -> unit
val set_color_tag_handling : Format.formatter -> unit