From 11db3838a8cbfd09ecca368e87305054832a4719 Mon Sep 17 00:00:00 2001
From: xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>
Date: Sun, 23 Feb 2014 08:23:10 +0000
Subject: 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
---
 backend/XTL.mli | 4 ++++
 1 file changed, 4 insertions(+)

(limited to 'backend/XTL.mli')

diff --git a/backend/XTL.mli b/backend/XTL.mli
index 21671e9..75a3d65 100644
--- a/backend/XTL.mli
+++ b/backend/XTL.mli
@@ -65,6 +65,10 @@ val vlocs: loc list -> var list
 val vmreg: mreg -> var
 val vmregs: mreg list -> var list
 
+(* Tests over variables *)
+
+val is_stack_reg: var -> bool
+
 (* Sets of variables *)
 
 module VSet: Set.S with type elt = var
-- 
cgit v1.2.3