Module Log_extended.Make_global

Parameters

Signature

val log : Async_unix__Log.t Core.Lazy.t

val level : unit -> Async_unix__Log.Level.t

val set_level : Async_unix__Log.Level.t -> unit

val set_output : Async_unix__Log.Output.t list -> unit

val get_output : unit -> Async_unix__Log.Output.t list

val set_on_error : [ `Raise | `Call of Core.Error.t -> unit ] -> unit

val would_log : Async_unix__Log.Level.t option -> bool

val set_level_via_param : unit -> unit Core.Command.Param.t

val raw : ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> ('a, unit, string, unit) Core.format4 -> 'a

val info : ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> ('a, unit, string, unit) Core.format4 -> 'a

val error : ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> ('a, unit, string, unit) Core.format4 -> 'a

val debug : ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> ('a, unit, string, unit) Core.format4 -> 'a

val flushed : unit -> unit Async_unix__.Import.Deferred.t

val rotate : unit -> unit Async_unix__.Import.Deferred.t

val printf : ?⁠level:Async_unix__Log.Level.t -> ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> ('a, unit, string, unit) Core.format4 -> 'a

val raw_s : ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> Core.Sexp.t -> unit

val info_s : ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> Core.Sexp.t -> unit

val error_s : ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> Core.Sexp.t -> unit

val debug_s : ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> Core.Sexp.t -> unit

val sexp : ?⁠level:Async_unix__Log.Level.t -> ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> Core.Sexp.t -> unit

val string : ?⁠level:Async_unix__Log.Level.t -> ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> string -> unit

val message : Async_unix__Log.Message.t -> unit

val surround_s : ?⁠level:Async_unix__Log.Level.t -> ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> Core.Sexp.t -> (unit -> 'a Async_unix__.Import.Deferred.t) -> 'a Async_unix__.Import.Deferred.t

val surroundf : ?⁠level:Async_unix__Log.Level.t -> ?⁠time:Core.Time.t -> ?⁠tags:(string * string) list -> ('a, unit, string, (unit -> 'b Async_unix__.Import.Deferred.t) -> 'b Async_unix__.Import.Deferred.t) Core.format4 -> 'a