include module type of struct include Async.Log end
module Level : sig ... endmodule Message : sig ... endmodule Rotation : sig ... endmodule Output : sig ... endmodule Blocking : sig ... endtype t = Async_unix__Log.tmodule type Global_intf = sig ... endmodule Make_global : sig ... endmodule Global : sig ... endval set_level_via_param : t -> unit Core.Command.Param.tval set_level : t -> Level.t -> unitval set_output : t -> Output.t list -> unitval get_output : t -> Output.t listval get_time_source : t -> Async_unix__.Import.Synchronous_time_source.tval set_time_source :
t ->
Async_unix__.Import.Synchronous_time_source.t ->
unitval get_on_error : t -> [ `Call of Core.Error.t -> unit | `Raise ]val set_on_error : t -> [ `Call of Core.Error.t -> unit | `Raise ] -> unitval close : t -> unit Async_unix__.Import.Deferred.tval is_closed : t -> boolval flushed : t -> unit Async_unix__.Import.Deferred.tval rotate : t -> unit Async_unix__.Import.Deferred.tval create :
level:Level.t ->
output:Output.t list ->
on_error:[ `Call of Core.Error.t -> unit | `Raise ] ->
?time_source:Async_unix__.Import.Synchronous_time_source.t ->
?transform:(Message.t -> Message.t) ->
unit ->
tval raw :
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
('a, unit, string, unit) Core.format4 ->
'aval debug :
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
('a, unit, string, unit) Core.format4 ->
'aval info :
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
('a, unit, string, unit) Core.format4 ->
'aval error :
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
('a, unit, string, unit) Core.format4 ->
'aval printf :
?level:Level.t ->
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
('a, unit, string, unit) Core.format4 ->
'aval raw_s :
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
Core.Sexp.t ->
unitval info_s :
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
Core.Sexp.t ->
unitval error_s :
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
Core.Sexp.t ->
unitval debug_s :
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
Core.Sexp.t ->
unitval sexp :
?level:Level.t ->
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
Core.Sexp.t ->
unitval string :
?level:Level.t ->
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
string ->
unitval message : t -> Message.t -> unitval surround_s :
on_subsequent_errors:[ `Call of exn -> unit | `Log | `Raise ] ->
?level:Level.t ->
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
Core.Sexp.t ->
(unit -> 'a Async_unix__.Import.Deferred.t) ->
'a Async_unix__.Import.Deferred.tval surroundf :
on_subsequent_errors:[ `Call of exn -> unit | `Log | `Raise ] ->
?level:Level.t ->
?time:Async_unix__.Import.Time.t ->
?tags:(string * string) list ->
t ->
('a,
unit,
string,
(unit -> 'b Async_unix__.Import.Deferred.t) ->
'b Async_unix__.Import.Deferred.t)
Core.format4 ->
'aval would_log : t -> Level.t option -> boolmodule Reader : sig ... endmodule For_testing : sig ... endmodule Private : sig ... end