Browse Source

+ WebAssembly interal linker: add global names to the name custom section

Nikolay Nikolov 10 months ago
parent
commit
a46c6229c5
1 changed files with 4 additions and 0 deletions
  1. 4 0
      compiler/ogwasm.pas

+ 4 - 0
compiler/ogwasm.pas

@@ -5039,6 +5039,8 @@ implementation
                     internalerror(2024010114);
                     internalerror(2024010114);
                 end;
                 end;
               WriteByte(FWasmSections[wsiGlobal],$0B);  { end }
               WriteByte(FWasmSections[wsiGlobal],$0B);  { end }
+              { add entry for the name section }
+              AddToGlobalNameMap(i,objsec.MainFuncSymbol.Name);
             end;
             end;
         end;
         end;
 
 
@@ -5147,9 +5149,11 @@ implementation
           WriteName(FWasmNameSubsections[wnstModuleName],current_module.exefilename);
           WriteName(FWasmNameSubsections[wnstModuleName],current_module.exefilename);
 
 
           WriteNameMap(FFunctionNameMap,FWasmNameSubsections[wnstFunctionNames]);
           WriteNameMap(FFunctionNameMap,FWasmNameSubsections[wnstFunctionNames]);
+          WriteNameMap(FGlobalNameMap,FWasmNameSubsections[wnstGlobalNames]);
 
 
           WriteNameSubsection(wnstModuleName);
           WriteNameSubsection(wnstModuleName);
           WriteNameSubsection(wnstFunctionNames);
           WriteNameSubsection(wnstFunctionNames);
+          WriteNameSubsection(wnstGlobalNames);
         end;
         end;
 
 
       var
       var