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

+ create exe sections in the wasi internal linker script

Browse Source
This commit is contained in:
Nikolay Nikolov 2023-12-28 15:17:59 +02:00
parent eeae32669e
commit 605740fd0a
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
compiler/systems/t_wasi.pas
View File

@ -298,6 +298,17 @@ begin
if s<>'' then
LinkScript.Concat('READOBJECT ' + maybequoted(s));
end;
LinkScript.Concat('EXESECTION .text');
LinkScript.Concat(' OBJSECTION .text.*');
LinkScript.Concat('ENDEXESECTION');
LinkScript.Concat('EXESECTION .data');
LinkScript.Concat(' OBJSECTION .rodata.*');
LinkScript.Concat(' OBJSECTION .data.*');
LinkScript.Concat(' OBJSECTION .bss');
LinkScript.Concat('ENDEXESECTION');
end;
function TInternalLinkerWasi.GetCodeSize(aExeOutput: TExeOutput): QWord;