Reg
module Raw_name : sig ... end
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; |
}
val dummy : t
val create : Cmm.machtype_component -> t
val createv : Cmm.machtype -> t array
val at_location : Cmm.machtype_component -> location -> t
val typv : t array -> Cmm.machtype
val anonymous : t -> bool
val name : t -> string
val all_registers : unit -> t list
val mark_visited : t -> unit
val is_visited : t -> bool