([> 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