module type Log_color = sig .. end
sig
end
Debug.Log_color
include Sdebug.Level
include Sdebug.Color_media
val print : ?level:int -> string -> unit
?level:int -> string -> unit