Make.Priority
type t
val compare : Priority.t -> Priority.t -> int
val to_string : Priority.t -> string