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