paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-03 00:07:28 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed reading of DW_FORM_ref_addr on i8086

Browse Source 
git-svn-id: trunk@39113 -
This commit is contained in:
nickysn 2018-05-25 00:21:53 +00:00
parent 6bd99b65bf
commit 45bcbca71b
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/inc/lnfodwrf.pp
View File

@ -1135,7 +1135,14 @@ procedure SkipAttr(form : QWord);
ReadNext(dummy,4);
end
else
ReadNext(dummy,header64.address_size);
begin
{ address size for DW_FORM_ref_addr must be at least 32 bits }
{ this is compatible with Open Watcom on i8086 }
if header64.address_size<4 then
ReadNext(dummy,4)
else
ReadNext(dummy,header64.address_size);
end;
DW_FORM_strp,
DW_FORM_sec_offset:
if isdwarf64 then