paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-01-04 15:00:53 +01:00
Code Issues Packages Projects Releases Wiki Activity

* patch by Christo Crause: handle references to absolute address 0 correctly, resolves #38861

Browse Source 
git-svn-id: trunk@49344 -
This commit is contained in:
florian 2021-05-07 16:19:05 +00:00
parent 964c04aded
commit 5e1e6c24a4
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/avr/cgcpu.pas
View File

@ -2357,7 +2357,9 @@ unit cgcpu;
if ref.addressmode<>AM_UNCHANGED then
internalerror(2011021706);
if assigned(ref.symbol) or (ref.offset<>0) then
if assigned(ref.symbol) or (ref.offset<>0) or
{ If no other reference information it must imply an absolute reference to address 0 }
((ref.index=NR_NO) and (ref.base=NR_NO)) then
begin
reference_reset(tmpref,0,[]);
tmpref.symbol:=ref.symbol;