Browse Source

* moved another local var to avoid bug

Nikolay Nikolov 1 year ago
parent
commit
50f76a2ffb
1 changed files with 2 additions and 3 deletions
  1. 2 3
      compiler/ogwasm.pas

+ 2 - 3
compiler/ogwasm.pas

@@ -2161,6 +2161,8 @@ implementation
         DataSectionRead: Boolean = false;
         DataCountSectionRead: Boolean = false;
 
+        SegmentInfoSectionRead: Boolean = false;
+
         DataSegments: array of record
           Active: Boolean;
           MemIdx: uint32;
@@ -2289,9 +2291,6 @@ implementation
 
           function ReadLinkingSection: Boolean;
 
-            var
-              SegmentInfoSectionRead: Boolean = false;
-
             function ReadSegmentInfo: Boolean;
               var
                 SegmentCount, SegAlignment, SegFlags: uint32;