summaryrefslogtreecommitdiff
path: root/ia32
diff options
context:
space:
mode:
Diffstat (limited to 'ia32')
-rw-r--r--ia32/Machregs.v3
1 files changed, 3 insertions, 0 deletions
diff --git a/ia32/Machregs.v b/ia32/Machregs.v
index 47340ec..85b561e 100644
--- a/ia32/Machregs.v
+++ b/ia32/Machregs.v
@@ -69,6 +69,9 @@ Module IndexedMreg <: INDEXED_TYPE.
Qed.
End IndexedMreg.
+Definition is_stack_reg (r: mreg) : bool :=
+ match r with FP0 => true | _ => false end.
+
(** ** Destroyed registers, preferred registers *)
Definition destroyed_by_op (op: operation): list mreg :=