Module `Log.Global`

Programs that want simplistic single-channel logging can open this module. It provides a global logging facility to a single output type at a single level. More nuanced logging can be had by using the functions that operate on a distinct Log.t type.

val log : t Core.Lazy.t

val level : unit -> Level.t

val set_level : Level.t -> unit

val set_output : Output.t list -> unit

val get_output : unit -> Output.t list

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

val get_time_source : unit -> Async_kernel.Synchronous_time_source.t

val set_time_source : Async_kernel.Synchronous_time_source.t -> unit

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

val set_transform : (Message.t -> Message.t) option -> unit

val would_log : Level.t option -> bool

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

Functions that operate on a given log. In this case they operate on a single log global to the module.

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

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

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

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

val flushed : unit -> unit Async_kernel.Deferred.t

val rotate : unit -> unit Async_kernel.Deferred.t

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

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

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

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

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

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

val string : 
  ?level:Level.t ->
  ?time:Time_unix.t ->
  ?tags:(string * string) list ->
  string ->
  unit

val message : Message.t -> unit

val surround_s : 
  ?level:Level.t ->
  ?time:Time_unix.t ->
  ?tags:(string * string) list ->
  Core.Sexp.t ->
  (unit -> 'a Async_kernel.Deferred.t) ->
  'a Async_kernel.Deferred.t

val surroundf : 
  ?level:Level.t ->
  ?time:Time_unix.t ->
  ?tags:(string * string) list ->
  ('a,
    unit,
    string,
    (unit -> 'b Async_kernel.Deferred.t) ->
    'b Async_kernel.Deferred.t)
    Core.format4 ->
  'a

module For_testing : sig ... end

package async_unix

Module Log.Global

Module `Log.Global`