From 265fa07b34a813ba9d8249ddad82d71e6002c10d Mon Sep 17 00:00:00 2001 From: xleroy Date: Thu, 2 Sep 2010 12:42:19 +0000 Subject: Merge of the reuse-temps branch: - Reload temporaries are marked as destroyed (set to Vundef) across operations in the semantics of LTL, LTLin, Linear and Mach, allowing Asmgen to reuse them. - Added IA32 port. - Cleaned up float conversions and axiomatization of floats. git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1499 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e --- backend/Stacking.v | 10 ++-------- 1 file changed, 2 insertions(+), 8 deletions(-) (limited to 'backend/Stacking.v') diff --git a/backend/Stacking.v b/backend/Stacking.v index f289793..2ea08be 100644 --- a/backend/Stacking.v +++ b/backend/Stacking.v @@ -127,16 +127,10 @@ Definition restore_callee_save (fe: frame_env) (k: Mach.code) := behaviour. *) Definition transl_op (fe: frame_env) (op: operation) := - match op with - | Oaddrstack ofs => Oaddrstack (Int.add (Int.repr fe.(fe_size)) ofs) - | _ => op - end. + shift_stack_operation (Int.repr fe.(fe_size)) op. Definition transl_addr (fe: frame_env) (addr: addressing) := - match addr with - | Ainstack ofs => Ainstack (Int.add (Int.repr fe.(fe_size)) ofs) - | _ => addr - end. + shift_stack_addressing (Int.repr fe.(fe_size)) addr. (** Translation of a Linear instruction. Prepends the corresponding Mach instructions to the given list of instructions. -- cgit v1.2.3