paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 04:26:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

* register skipping (aligning) for int64 parameters, sys V abi only.

Browse Source
This commit is contained in:
marco 2003-05-30 23:45:49 +00:00
parent a73b98ea9f
commit 1daf2ca476
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/powerpc/cpupara.pas
View File

@ -216,6 +216,8 @@ unit cpupara;
hp.paraloc.loc:=LOC_REGISTER; hp.paraloc.loc:=LOC_REGISTER;
if is_64bit then if is_64bit then
begin begin
if odd((nextintreg.number-NR_R3) shr 8) and (target_info.abi=abi_powerpc_sysv) Then
inc(nextintreg.number,NR_R1-NR_R0);
hp.paraloc.registerhigh:=nextintreg; hp.paraloc.registerhigh:=nextintreg;
inc(nextintreg.number,NR_R1-NR_R0); inc(nextintreg.number,NR_R1-NR_R0);
if target_info.abi=abi_powerpc_aix then if target_info.abi=abi_powerpc_aix then
@ -335,7 +337,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.33 2003-05-30 22:54:19 marco Revision 1.34 2003-05-30 23:45:49 marco
* register skipping (aligning) for int64 parameters, sys V abi only.
Revision 1.33 2003/05/30 22:54:19 marco
* getfuncretparaloc now uses r3 for highdword and r4 for lo. Doesn't work tho * getfuncretparaloc now uses r3 for highdword and r4 for lo. Doesn't work tho
Revision 1.32 2003/05/30 22:35:03 marco Revision 1.32 2003/05/30 22:35:03 marco