瀏覽代碼

* 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 年之前
父節點
當前提交
a762532ae1
共有 1 個文件被更改,包括 4 次插入4 次删除
  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;