`([> Cf_journal.Basic.level ] as 'c) #Cf_journal.basic_prioritizer ->
'c ->
(('c #Cf_journal.Basic.event as 'e) #Cf_journal.Basic.archiver as 'd) list ->
object
val mutable archivers_ : 'd list
val mutable limit_ : Basic.Priority.t
method debug : ('a, unit, string, bool) Stdlib.format4 -> 'a
method enabled : 'c -> bool
method error : ('a, unit, string, unit) Stdlib.format4 -> 'a
method private virtual event : 'c -> string -> 'e
method fail : ('a, unit, string, 'b) Stdlib.format4 -> 'a
method info : ('a, unit, string, unit) Stdlib.format4 -> 'a
method invalid : ('a, unit, string, 'b) Stdlib.format4 -> 'a
method notice : ('a, unit, string, unit) Stdlib.format4 -> 'a
method private put :
'a 'b. 'c -> ('e -> 'b) -> ('a, unit, string, 'b) format4 -> 'a
method setlimit : 'c -> unit
method warn : ('a, unit, string, unit) Stdlib.format4 -> 'a
end`