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

* pic'fied startup code

Browse Source 
(cherry picked from commit baa28faa19)
This commit is contained in:
florian 2021-10-25 21:39:24 +02:00
parent 6db696a782
commit 9bd665d069
2 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
rtl/linux/x86_64/si_c.inc
View File

@ -155,10 +155,10 @@ procedure _FPC_libc_start; assembler; nostackframe; public name '_start';
pushq %rsp
{ Pass address of our own entry points to .fini and .init. }
movq $ini_dummy, %r8
movq $ini_dummy, %rcx
movq ini_dummy@GOTPCREL(%rip), %r8
movq ini_dummy@GOTPCREL(%rip), %rcx
movq $main_stub, %rdi
movq main_stub@GOTPCREL(%rip), %rdi
{ Call the user's main function, and exit with its value.
But let the libc call main. }

6
rtl/linux/x86_64/si_g.inc
View File

@ -169,10 +169,10 @@ procedure ini_dummy;
pushq %rsp
{ Pass address of our own entry points to .fini and .init. }
movq $ini_dummy, %r8
movq $ini_dummy, %rcx
movq ini_dummy@GOTPCREL(%rip), %r8
movq ini_dummy@GOTPCREL(%rip), %rcx
movq $main_stub, %rdi
movq main_stub@GOTPCREL(%rip), %rdi
{ Call the user's main function, and exit with its value.
But let the libc call main. }