Browse Source

* changed the MemPos field in TObjSection and TExeSection from aword to qword:
1) aword follows the ALU size of the CPU, not the address size
2) it is already qword in TExeOutput and its methods and there's already
MaxMemPos to check if the limits of the platform/exe format have been
exceeded

git-svn-id: trunk@31357 -

nickysn 10 years ago
parent
commit
a762532ae1
1 changed files with 4 additions and 4 deletions
  1. 4 4
      compiler/ogbase.pas

+ 4 - 4
compiler/ogbase.pas

@@ -238,8 +238,8 @@ interface
        SecAlign   : shortint;   { alignment of the section }
        SecAlign   : shortint;   { alignment of the section }
        { section Data }
        { section Data }
        Size,
        Size,
-       DataPos,
-       MemPos     : aword;
+       DataPos    : aword;
+       MemPos     : qword;
        Group      : TObjSectionGroup;
        Group      : TObjSectionGroup;
        DataAlignBytes : shortint;
        DataAlignBytes : shortint;
        { Relocations (=references) to other sections }
        { Relocations (=references) to other sections }
@@ -443,8 +443,8 @@ interface
         FObjSectionList : TFPObjectList;
         FObjSectionList : TFPObjectList;
       public
       public
         Size,
         Size,
-        DataPos,
-        MemPos     : aword;
+        DataPos    : aword;
+        MemPos     : qword;
         SecAlign   : shortint;
         SecAlign   : shortint;
         Disabled   : boolean;
         Disabled   : boolean;
         SecOptions : TObjSectionOptions;
         SecOptions : TObjSectionOptions;