paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-16 01:30:33 +01:00
Code Issues Packages Projects Releases Wiki Activity

* handle 64 bit parameters correctly for arm eabi

Browse Source 
git-svn-id: trunk@11913 -
This commit is contained in:
florian 2008-10-18 13:48:57 +00:00
parent 3b5699e488
commit 04fe88f134
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/arm/cpupara.pas
View File

@ -332,7 +332,9 @@ unit cpupara;
{ align registers for eabi }
if (target_info.abi=abi_eabi) and
(paracgsize in [OS_F64,OS_64,OS_S64]) and
(nextintreg in [RS_R1,RS_R3]) then
(nextintreg in [RS_R1,RS_R3]) and
{ first location? }
(paralen=8) then
inc(nextintreg);
{ this is not abi compliant
why? (FK) }
@ -386,7 +388,9 @@ unit cpupara;
{ align stack for eabi }
if (target_info.abi=abi_eabi) and
(paracgsize in [OS_F64,OS_64,OS_S64]) and
(stack_offset mod 8<>0) then
(stack_offset mod 8<>0) and
{ first location? }
(paralen=8) then
inc(stack_offset,8-(stack_offset mod 8));
paraloc^.size:=OS_ADDR;