Regalloc_irc_utils.RegWorkList
type t =
| Unknown_list
| Precolored
| Initial
| Simplify
| Freeze
| Spill
| Spilled
| Coalesced
| Colored
| Select_stack
val equal : t -> t -> bool
val to_string : t -> string