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

* WebAssembly threads internal linker: declare the symbol __wasm_init_tls in the

Browse Source 
.text section (function will be generated later by the linker)
This commit is contained in:
Nikolay Nikolov 2024-08-10 19:59:06 +03:00
parent a87481cfa4
commit 0642f14552
1 changed files with 13 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
compiler/systems/t_wasi.pas
View File

@ -345,11 +345,20 @@ begin
is important to keep the sections grouped, and keep the first section in
each group intact (otherwise, TWasmExeOutput.MemPos_ExeSection in ogwasm.pas
needs to be updated) }
{ tags (used by WebAssembly native exceptions) }
ScriptAddGenericSections('.wasm_tags');
{ code }
if ts_wasm_threads in current_settings.targetswitches then
begin
linkscript.Concat('EXESECTION .text');
linkscript.Concat(' OBJSECTION .text*');
{ functions, generated by the linker: }
linkscript.Concat(' SYMBOL __wasm_init_tls');
linkscript.Concat('ENDEXESECTION');
end
else
ScriptAddGenericSections('.text');
ScriptAddGenericSections(
{ tags (used by WebAssembly native exceptions) }
'.wasm_tags,'+
{ code }
'.text,'+
{ data (initialized data first, uninitialized data later) }
'.rodata,.data,fpc.resources,fpc.reshandles,.bss,'+
{ debug info }