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