val output : unit BatIO.output Pervasives.refval prefix : string Pervasives.refval flags : flag list Pervasives.refval logf : ?fp:string -> ('a, unit BatIO.output, unit) Pervasives.format -> 'aval fatalf :
?fp:string ->
('a, unit BatIO.output, unit) Pervasives.format ->
'amodule type Config = sig ... endval make_logger :
'a BatIO.output ->
string ->
[< `Custom of unit -> string | `Date | `Filepos | `Time ] list ->
< fatal : ?fp:string -> string -> 'b
; fatalf :
?fp:string ->
('c, 'a BatIO.output, unit, unit, unit, 'd) Pervasives.format6 ->
'c
; log : ?fp:string -> string -> unit
; logf : ?fp:string -> ('e, 'a BatIO.output, unit) Pervasives.format -> 'e >module Easy : sig ... endmodule type Level_sig = sig ... end