sig type t val normal : Jobs.Priority.t val low : Jobs.Priority.t val to_string : Jobs.Priority.t -> string val sexp_of_t : Jobs.Priority.t -> Sexplib.Sexp.t end