paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-07 20:50:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

* revert revision 21251 for pdecvar.pas: not generating the bss-data for the static symbol for a generic breaks linking with debug info enabled; I'll need to find a better solution to avoid unneeded use of space (luckily it wasn't needed to fix any bug ^^)

Browse Source 
git-svn-id: trunk@21264 -
This commit is contained in:
svenbarth 2012-05-09 12:02:41 +00:00
parent db955f842f
commit def357287e
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/pdecvar.pas
View File

@ -1773,8 +1773,10 @@ implementation
fieldvs:=tfieldvarsym(sc[i]);
fieldvs.visibility:=visibility;
hstaticvs:=make_field_static(recst,fieldvs);
if not parse_generic then
cnodeutils.insertbssdata(hstaticvs);
{ for generics it would be better to disable the following,
but simply disabling it in that case breaks linking with
debug info }
cnodeutils.insertbssdata(hstaticvs);
if vd_final in options then
hstaticvs.varspez:=vs_final;
end;