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

* wasm internal linker: start the .text section at mempos 0

Browse Source
This commit is contained in:
Nikolay Nikolov 2024-01-01 22:54:16 +02:00
parent 5eb5fdabad
commit c49ac16a19
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/ogwasm.pas
View File

@ -4685,7 +4685,9 @@ implementation
(the LLVM leaves the first 1024 bytes in the data segment empty, so we (the LLVM leaves the first 1024 bytes in the data segment empty, so we
start at 1024). } start at 1024). }
if aname='.rodata' then if aname='.rodata' then
CurrMemPos:=1024; CurrMemPos:=1024
else if aname='.text' then
CurrMemPos:=0;
inherited MemPos_ExeSection(aname); inherited MemPos_ExeSection(aname);
end; end;