sig
  val set_lev : Syslog.lev -> unit
  val get_lev : unit -> Syslog.lev
  val may_log : Syslog.lev -> bool
  val generic : Syslog.lev -> 'Loggers.logger
  val debug : 'Loggers.logger
  val info : 'Loggers.logger
  val notice : 'Loggers.logger
  val warning : 'Loggers.logger
  val err : 'Loggers.logger
  val crit : 'Loggers.logger
  val alert : 'Loggers.logger
  val emerg : 'Loggers.logger
end