sig
  type t
  val ansi : Color_print.Style.t
  val no_formatting : Color_print.Style.t
  val ok_or_not : Color_print.Style.t
end