module Ansi:Colour printing on terminalssig
..end
val is_color_tty : unit -> bool
typestyle =
[ `Green | `Red | `Underline ]
val printf : style ->
('a, Pervasives.out_channel, unit) Pervasives.format -> 'a
val eprintf : style ->
('a, Pervasives.out_channel, unit) Pervasives.format -> 'a