diff options
| author |  xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2014-02-23 08:23:10 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2014-02-23 08:23:10 +0000 |
| commit | 11db3838a8cbfd09ecca368e87305054832a4719 (patch) | |
| tree | b48fb36fe0709ea794ffecbfca92680e3227edc3 /arm | |
| parent | 5af448143e8d548a8d73d8ed613156e331ca0e0b (diff) | |
In Regalloc, dead code elimination, don't eliminate move operations
that pop the x87 FP stack (var <- FP0). Otherwise, (void) f();
where f returns a float eventually produces a FP stack overflow.
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@2416 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'arm')
| -rw-r--r-- | arm/Machregs.v | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/arm/Machregs.v b/arm/Machregs.v index d4439ef..b55259b 100644 --- a/arm/Machregs.v +++ b/arm/Machregs.v @@ -77,6 +77,8 @@ Module IndexedMreg <: INDEXED_TYPE. Qed. End IndexedMreg. +Definition is_stack_reg (r: mreg) : bool := false. + (** ** Destroyed registers, preferred registers *) Definition destroyed_by_op (op: operation): list mreg := |