sig val create : ?debug:Console.Ansi.attr list -> ?info:Console.Ansi.attr list -> ?error:Console.Ansi.attr list -> Core.Std.Out_channel.t -> Async.Std.Log.Message.t -> unit end