paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-27 11:10:23 +02:00
Code Issues Packages Projects Releases Wiki Activity

* missing part of r32617: also load the def for constnil symbols

Browse Source 
git-svn-id: trunk@32632 -
This commit is contained in:
Jonas Maebe 2015-12-10 22:45:53 +00:00
parent 5dcf5a95c5
commit a1db947e9e
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/symsym.pas
View File

@ -2412,7 +2412,8 @@ implementation
new(pguid(value.valueptr)); new(pguid(value.valueptr));
ppufile.getdata(value.valueptr^,sizeof(tguid)); ppufile.getdata(value.valueptr^,sizeof(tguid));
end; end;
constnil : ; constnil :
ppufile.getderef(constdefderef);
else else
Message1(unit_f_ppu_invalid_entry,tostr(ord(consttyp))); Message1(unit_f_ppu_invalid_entry,tostr(ord(consttyp)));
end; end;