sig type color = [ `Blue | `Cyan | `Green | `Normal | `Red | `Yellow ] val reset_line : string val pp_str_c : ?bold:bool -> colors:bool -> QCheck_base_runner.Color.color -> Stdlib.out_channel -> string -> unit end