Misc.Style(3o)

NAME
Misc.Style - no description

Module
Module Misc.Style

Documentation

Module Style
 : sig end

type color =
 | Black
 | Red
 | Green
 | Yellow
 | Blue
 | Magenta
 | Cyan
 | White

type style =
 | FG of color
 | BG of color
 | Bold
 | Reset

type Format.stag +=
 | Style of style list

val ansi_of_style_l : style list -> string

type tag_style = {
 ansi : style list ;
 text_open : string ;
 text_close : string ;
 }

type styles = {
 error : tag_style ;
 warning : tag_style ;
 loc : tag_style ;
 hint : tag_style ;
 inline_code : tag_style ;
 }

val hint : Format_doc.formatter -> unit

val as_inline_code : 'a Format_doc.printer -> 'a Format_doc.printer

val inline_code : string Format_doc.printer

val default_styles : styles

val get_styles : unit -> styles

val set_styles : styles -> unit

val setup : Misc.Color.setting option -> unit

val set_tag_handling : Format.formatter -> unit