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

* all references to libc_csu_ cleaned, should resolve #39295

Browse Source
This commit is contained in:
florian 2022-01-05 21:42:17 +01:00
parent abee68df92
commit b00fe0e4e4
2 changed files with 9 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
rtl/linux/powerpc64/si_c.inc
View File

@ -657,9 +657,6 @@ _restvr_31: addi r12,r0,-16
Process start/halt Process start/halt
******************************************************************************} ******************************************************************************}
procedure __libc_csu_init; cdecl; external;
procedure __libc_csu_fini; cdecl; external;
procedure __libc_start_main(r3,r4,r5,r6,r7,r8,r9: pointer); cdecl; external; procedure __libc_start_main(r3,r4,r5,r6,r7,r8,r9: pointer); cdecl; external;
var var

14
rtl/linux/powerpc64/si_g.inc
View File

@ -657,9 +657,6 @@ _restvr_31: addi r12,r0,-16
Process start/halt Process start/halt
******************************************************************************} ******************************************************************************}
procedure __libc_csu_init; cdecl; external;
procedure __libc_csu_fini; cdecl; external;
procedure __libc_start_main(r3,r4,r5,r6,r7,r8,r9: pointer); cdecl; external; procedure __libc_start_main(r3,r4,r5,r6,r7,r8,r9: pointer); cdecl; external;
type type
@ -736,6 +733,11 @@ data_start:
.text .text
end; end;
procedure ini_dummy;
begin
end;
const const
start_addresses: record start_addresses: record
sda_base: pointer; sda_base: pointer;
@ -745,8 +747,10 @@ const
end end
= (sda_base: nil; {* was _SDA_BASE_ but not in 64-bit ABI } = (sda_base: nil; {* was _SDA_BASE_ but not in 64-bit ABI }
main: @main_stub; main: @main_stub;
libc_csu_init: @__libc_csu_init; { use dummy, it should not be used anymore by glibc }
libc_csu_fini: @__libc_csu_fini libc_csu_init: @ini_dummy;
{ use dummy, it should not be used anymore by glibc }
libc_csu_fini: @ini_dummy
); );
procedure call_libc_start_main(r3,r4,r5,r6,r7,r8,r9: pointer); cdecl; procedure call_libc_start_main(r3,r4,r5,r6,r7,r8,r9: pointer); cdecl;