type t = {mutable raw_name : Raw_name.t;stamp : int;typ : Cmm.machtype_component;mutable loc : location;mutable spill : bool;mutable part : int option;mutable interf : t list;mutable prefer : (t * int) list;mutable degree : int;mutable spill_cost : int;mutable visited : int;
}and stack_location = | Local of int| Incoming of int| Outgoing of int| Domainstate of int
val createv_like : t array -> t arrayval anonymous : t -> boolval disjoint_set_array : Set.t -> t array -> boolval set_of_array : t array -> Set.tval all_registers : unit -> t listval num_registers : unit -> intval reinit : unit -> unitval mark_visited : t -> unitval is_visited : t -> boolval clear_visited_marks : unit -> unit