paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-23 20:29:33 +02:00
Code Issues Packages Projects Releases Wiki Activity

* keep stack aligned at 8 byte boundary inside the startup code

Browse Source 
git-svn-id: trunk@11934 -
This commit is contained in:
florian 2008-10-18 21:20:54 +00:00
parent d11e72b383
commit 10e0f0e387
3 changed files with 8 additions and 1 deletions

2
rtl/linux/arm/gprt0.as
View File

@ -46,6 +46,8 @@ _start:
/* Save initial stackpointer */
ldr ip,=__stkptr
str sp,[ip]
/* align sp again to 8 byte boundary, needed by eabi */
sub sp,sp,#4
/* Let the libc call main and exit with its return code. */
bl PASCALMAIN

4
rtl/linux/arm/prt0.as
View File

@ -62,9 +62,11 @@ _start:
str sp,[a3]
str a2,[ip]
/* Save initial stackpointer */
/* Save initial stackpointer */
ldr ip,=__stkptr
str sp,[ip]
/* align sp again to 8 byte boundary, needed by eabi */
sub sp,sp,#4
/* Let the libc call main and exit with its return code. */
bl PASCALMAIN

3
rtl/linux/arm/ucprt0.as
View File

@ -121,6 +121,9 @@ _start:
ldr ip,=__stkptr
str sp, [ip]
/* keep stack aligned as required by eabi */
sub sp,sp,#4
/* Push stack limit */
str a3, [sp, #-4]!