mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-07 01:05:56 +02:00
* call external routines via their TOC entry instead of directly
(mantis #29004) git-svn-id: trunk@32527 -
This commit is contained in:
parent
740f8532df
commit
2249d95ddb
@ -373,7 +373,7 @@ FUNCTION_PROLOG _start
|
|||||||
/* PPC64 ABI uses R13 for thread local, so we leave it alone */
|
/* PPC64 ABI uses R13 for thread local, so we leave it alone */
|
||||||
LOAD_64BIT_VAL 8, start_addresses
|
LOAD_64BIT_VAL 8, start_addresses
|
||||||
|
|
||||||
b .__libc_start_main
|
bl __libc_start_main
|
||||||
nop /* a NOP for the linker */
|
nop /* a NOP for the linker */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
|
@ -373,7 +373,7 @@ FUNCTION_PROLOG _start
|
|||||||
/* PPC64 ABI uses R13 for thread local, so we leave it alone */
|
/* PPC64 ABI uses R13 for thread local, so we leave it alone */
|
||||||
LOAD_64BIT_VAL 8, start_addresses
|
LOAD_64BIT_VAL 8, start_addresses
|
||||||
|
|
||||||
b .__libc_start_main
|
b __libc_start_main
|
||||||
nop /* a NOP for the linker */
|
nop /* a NOP for the linker */
|
||||||
|
|
||||||
/*
|
/*
|
||||||
@ -404,17 +404,17 @@ FUNCTION_PROLOG main_stub
|
|||||||
LOAD_64BIT_VAL 3, _start
|
LOAD_64BIT_VAL 3, _start
|
||||||
ld 3, 0(3)
|
ld 3, 0(3)
|
||||||
LOAD_64BIT_VAL 4, etext
|
LOAD_64BIT_VAL 4, etext
|
||||||
bl .__monstartup
|
bl __monstartup
|
||||||
nop
|
nop
|
||||||
|
|
||||||
LOAD_64BIT_VAL 3, _mcleanup
|
LOAD_64BIT_VAL 3, _mcleanup
|
||||||
bl .atexit
|
bl atexit
|
||||||
nop
|
nop
|
||||||
|
|
||||||
bl .PASCALMAIN
|
bl PASCALMAIN
|
||||||
nop
|
nop
|
||||||
|
|
||||||
b ._haltproc
|
b ._haltproc
|
||||||
|
|
||||||
FUNCTION_PROLOG _haltproc
|
FUNCTION_PROLOG _haltproc
|
||||||
LOAD_64BIT_VAL 8, ___fpc_ret
|
LOAD_64BIT_VAL 8, ___fpc_ret
|
||||||
|
Loading…
Reference in New Issue
Block a user