sig
  type t = Priority.t = Normal | Low
  val normal : t
  val low : t
  val sexp_of_t : t -> Sexplib.Sexp.t
end