Module Misc.Color

type color = Melange_wrapper.Misc.Color.color =
  1. | Black
  2. | Red
  3. | Green
  4. | Yellow
  5. | Blue
  6. | Magenta
  7. | Cyan
  8. | White
;
type style =
  1. | FG(color)
  2. | BG(color)
  3. | Bold
  4. | Reset
  5. | Dim
;
type Format.stag +=
  1. | Style(list(style))
;
let ansi_of_style_l: list(style) => string;
type styles = {
  1. error: list(style),
  2. warning: list(style),
  3. loc: list(style),
};
let default_styles: styles;
let get_styles: unit => styles;
let set_styles: styles => unit;
type setting = Melange_wrapper.Misc.Color.setting =
  1. | Auto
  2. | Always
  3. | Never
;
let default_setting: setting;
let setup: option(setting) => unit;
let set_color_tag_handling: Format.formatter => unit;