paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-14 21:59:47 +02:00
Code Issues Packages Projects Releases Wiki Activity

* the len parameter of TObjData.alloc changed to TObjSectionOfs

Browse Source 
git-svn-id: trunk@45491 -
This commit is contained in:
nickysn 2020-05-25 00:16:38 +00:00
parent 36323fe424
commit e8af7427bb
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/ogbase.pas
View File

@ -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);