mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-10 08:08:36 +02:00
+ WebAssembly interal linker: add global names to the name custom section
This commit is contained in:
parent
507e728ee8
commit
a46c6229c5
@ -5039,6 +5039,8 @@ implementation
|
||||
internalerror(2024010114);
|
||||
end;
|
||||
WriteByte(FWasmSections[wsiGlobal],$0B); { end }
|
||||
{ add entry for the name section }
|
||||
AddToGlobalNameMap(i,objsec.MainFuncSymbol.Name);
|
||||
end;
|
||||
end;
|
||||
|
||||
@ -5147,9 +5149,11 @@ implementation
|
||||
WriteName(FWasmNameSubsections[wnstModuleName],current_module.exefilename);
|
||||
|
||||
WriteNameMap(FFunctionNameMap,FWasmNameSubsections[wnstFunctionNames]);
|
||||
WriteNameMap(FGlobalNameMap,FWasmNameSubsections[wnstGlobalNames]);
|
||||
|
||||
WriteNameSubsection(wnstModuleName);
|
||||
WriteNameSubsection(wnstFunctionNames);
|
||||
WriteNameSubsection(wnstGlobalNames);
|
||||
end;
|
||||
|
||||
var
|
||||
|
Loading…
Reference in New Issue
Block a user