Module Reg
module Name : sig ... endand stack_location = | Local of int| Incoming of int| Outgoing of int| Domainstate of int
val dummy_for_regalloc : Reg.tval create_with_typ_and_name : ?prefix_if_var:string -> Reg.t -> Reg.tval createv_with_typs : Reg.t array -> Reg.t arrayval is_reg : Reg.t -> boolval is_stack : Reg.t -> boolval is_unknown : Reg.t -> boolval is_preassigned : Reg.t -> boolval is_domainstate : Reg.t -> boolval all_relocatable_regs : unit -> Reg.t listval clear_relocatable_regs : unit -> unitval reinit_relocatable_regs : unit -> unitval same_loc_fatal_on_unknown : fatal_message:string -> Reg.t -> Reg.t -> boolval compare_loc_fatal_on_unknown :
fatal_message:string ->
Reg.t ->
Reg.t ->
intval is_of_type_addr : Reg.t -> bool