浏览代码

* the len parameter of TObjData.alloc changed to TObjSectionOfs

git-svn-id: trunk@45491 -
nickysn 5 年之前
父节点
当前提交
e8af7427bb
共有 1 个文件被更改,包括 2 次插入2 次删除
  1. 2 2
      compiler/ogbase.pas

+ 2 - 2
compiler/ogbase.pas

@@ -428,7 +428,7 @@ interface
        function  symbolref(const aname:string):TObjSymbol;
        procedure ResetCachedAsmSymbols;
        { Allocation }
-       procedure alloc(len:aword);
+       procedure alloc(len:TObjSectionOfs);
        procedure allocalign(len:longint);
        procedure writebytes(const Data;len:aword);
        procedure writeReloc(Data:TRelocDataInt;len:aword;p:TObjSymbol;Reloctype:TObjRelocationType);virtual;abstract;
@@ -1539,7 +1539,7 @@ implementation
       end;
 
 
-    procedure TObjData.alloc(len:aword);
+    procedure TObjData.alloc(len:TObjSectionOfs);
       begin
         if not assigned(CurrObjSec) then
           internalerror(200402252);