Module Misc.Style

type color = Melange_wrapper.Misc.Style.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 Stdlib.Format.stag +=
  1. | Style(list(style))
;
let ansi_of_style_l: list(style) => string;
type tag_style = {
  1. ansi: list(style),
  2. text_open: string,
  3. text_close: string,
};
type styles = {
  1. error: tag_style,
  2. warning: tag_style,
  3. loc: tag_style,
  4. hint: tag_style,
  5. inline_code: tag_style,
};
let as_inline_code: (Stdlib.Format.formatter => 'a => unit) as 'printer => 'printer;
let inline_code: Stdlib.Format.formatter => string => unit;
let default_styles: styles;
let get_styles: unit => styles;
let set_styles: styles => unit;
let setup: option(Color.setting) => unit;
let set_tag_handling: Stdlib.Format.formatter => unit;