paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-16 18:39:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ added support for ABI_AIX in get_caller_addr

Browse Source
This commit is contained in:
olle 2003-08-24 20:47:49 +00:00
parent 9edd2b0401
commit 66595617c4
1 changed files with 8 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
rtl/powerpc/powerpc.inc
View File

@ -874,9 +874,12 @@ asm
lwz r3,0(r3) lwz r3,0(r3)
cmplwi r3,0 cmplwi r3,0
beq Lcaller_addr_frame_null beq Lcaller_addr_frame_null
{$ifdef ABI_AIX}
lwz r3,8(r3)
{$else}
lwz r3,4(r3) lwz r3,4(r3)
{$endif}
Lcaller_addr_frame_null: Lcaller_addr_frame_null:
// !!!!!!! depends on ABI !!!!!!!!
end; end;
@ -963,7 +966,10 @@ end;
{ {
$Log$ $Log$
Revision 1.51 2003-06-14 12:41:08 jonas Revision 1.52 2003-08-24 20:47:49 olle
+ added support for ABI_AIX in get_caller_addr
Revision 1.51 2003/06/14 12:41:08 jonas
* fixed compilation problems (removed unnecessary modified registers * fixed compilation problems (removed unnecessary modified registers
lists from procedures) lists from procedures)