Logging (p.frenetic.5.0.5.doc.frenetic.async.Frenetic

include Async.Log.Global_intf

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 : [ `Call of Core.Error.t -> unit | `Raise ] -> unit

val get_time_source : unit -> Async_unix__.Import.Synchronous_time_source.t

val set_time_source : Async_unix__.Import.Synchronous_time_source.t -> unit

val get_transform : 
  unit ->
  (Async_unix__Log.Message.t -> Async_unix__Log.Message.t) option

val set_transform : 
  (Async_unix__Log.Message.t -> Async_unix__Log.Message.t) option ->
  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