Module Console

type text_style = [
  1. | `bold
  2. | `underline
  3. | `crossed
  4. | `black
  5. | `red
  6. | `green
  7. | `yellow
  8. | `blue
  9. | `magenta
  10. | `cyan
  11. | `white
]
val colorize : text_style list -> string -> string
val start_color : text_style list -> string
val stop_color : unit -> string
type color_conf = [
  1. | `Always
  2. | `Never
  3. | `Auto
]
val color_conf : color_conf Stdlib.ref