Regalloc_utils.SpillCosts
type t
val empty : unit -> t
val iter : t -> f:(Reg.t -> int -> unit) -> unit
val for_reg : t -> Reg.t -> int
val add_to_reg : t -> Reg.t -> int -> unit
val compute : Cfg_with_infos.t -> flat:bool -> unit -> t