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

* WebAssembly internal linker: only generate the tag name subsection if there

Browse Source 
are any tags in the module
This commit is contained in:
Nikolay Nikolov 2024-09-21 09:43:18 +03:00
parent 508e0dd01c
commit 130d1e9d40
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/ogwasm.pas
View File

@ -5174,8 +5174,11 @@ implementation
WriteNameMap(FDataNameMap,FWasmNameSubsections[wnstDataNames]);
WriteNameSubsection(wnstDataNames);
WriteNameMap(FTagNameMap,FWasmNameSubsections[wnstTagNames]);
WriteNameSubsection(wnstTagNames);
if Length(FTagNameMap)>0 then
begin
WriteNameMap(FTagNameMap,FWasmNameSubsections[wnstTagNames]);
WriteNameSubsection(wnstTagNames);
end;
end;
var