From e8af7427bb0ead629eea25ac86556605b1dea252 Mon Sep 17 00:00:00 2001
From: nickysn <nickysn@gmail.com>
Date: Mon, 25 May 2020 00:16:38 +0000
Subject: [PATCH] * the len parameter of TObjData.alloc changed to
 TObjSectionOfs

git-svn-id: trunk@45491 -
---
 compiler/ogbase.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/compiler/ogbase.pas b/compiler/ogbase.pas
index 24387afea3..7c550c478d 100644
--- a/compiler/ogbase.pas
+++ b/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);