diff --git a/compiler/ogrel.pas b/compiler/ogrel.pas index bba4126a74..8ada314f40 100644 --- a/compiler/ogrel.pas +++ b/compiler/ogrel.pas @@ -313,6 +313,7 @@ implementation else begin objreloc:=TRelRelocation.CreateSection(CurrObjSec.Size,p.objsection,Reloctype); + inc(data,symaddr); if Reloctype in [RELOC_ABSOLUTE_HI8,RELOC_ABSOLUTE_LO8] then objreloc.HiByte:=Byte(Data shr 8); CurrObjSec.ObjRelocations.Add(objreloc);