diff options
| author | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2008-04-12 12:55:21 +0000 |
|---|---|---|
| committer | xleroy <xleroy@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e> | 2008-04-12 12:55:21 +0000 |
| commit | aaa49526068f528f2233de0dace43549432fba52 (patch) | |
| tree | e675fe11f225858ddd290594fa5ffed2865d5677 /backend/Mach.v | |
| parent | 845148dea58bbdd041c399a8c9196d9e67bec629 (diff) | |
| download | compcert-aaa49526068f528f2233de0dace43549432fba52.tar.gz compcert-aaa49526068f528f2233de0dace43549432fba52.zip | |
Revu gestion retaddr et link dans Stacking
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@604 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'backend/Mach.v')
| -rw-r--r-- | backend/Mach.v | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/backend/Mach.v b/backend/Mach.v index f7275041..c64903b8 100644 --- a/backend/Mach.v +++ b/backend/Mach.v @@ -70,7 +70,9 @@ Record function: Set := mkfunction { fn_sig: signature; fn_code: code; fn_stacksize: Z; - fn_framesize: Z }. + fn_framesize: Z; + fn_link_ofs: int; + fn_retaddr_ofs: int }. Definition fundef := AST.fundef function. @@ -137,6 +139,3 @@ Definition find_function_ptr Genv.find_symbol ge symb end. -Definition align_16_top (lo hi: Z) := - Zmax 0 (((hi - lo + 15) / 16) * 16 + lo). - |