sig
  type t =
      KERN
    | USER
    | MAIL
    | DAEMON
    | AUTH
    | SYSLOG
    | LPR
    | NEWS
    | UUCP
    | CRON
    | AUTHPRIV
    | FTP
    | LOCAL0
    | LOCAL1
    | LOCAL2
    | LOCAL3
    | LOCAL4
    | LOCAL5
    | LOCAL6
    | LOCAL7
  val t_of_sexp : Sexplib.Sexp.t -> Syslog.Facility.t
  val sexp_of_t : Syslog.Facility.t -> Sexplib.Sexp.t
end