Browse Source

* WebAssembly internal linker: moved the DataSections const array from local to
the method writeData to local to the class. No functional changes.

Nikolay Nikolov 1 year ago
parent
commit
cfa7d6a0c6
1 changed files with 6 additions and 5 deletions
  1. 6 5
      compiler/ogwasm.pas

+ 6 - 5
compiler/ogwasm.pas

@@ -247,6 +247,12 @@ interface
       { TWasmExeOutput }
       { TWasmExeOutput }
 
 
       TWasmExeOutput = class(TExeOutput)
       TWasmExeOutput = class(TExeOutput)
+      private
+        const
+          DataSections: array [1..3] of string = (
+            '.rodata',
+            '.data',
+            'fpc.resources');
       private
       private
         FImports: TFPHashObjectList;
         FImports: TFPHashObjectList;
         FFuncTypes: TWasmFuncTypeTable;
         FFuncTypes: TWasmFuncTypeTable;
@@ -4705,11 +4711,6 @@ implementation
               internalerror(2024010107);
               internalerror(2024010107);
           end;
           end;
 
 
-        const
-          DataSections: array [1..3] of string = (
-            '.rodata',
-            '.data',
-            'fpc.resources');
         var
         var
           DataCount: Integer;
           DataCount: Integer;
           DataSecName: string;
           DataSecName: string;