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

* moved comments in from of fields for better readability

Browse Source 
git-svn-id: trunk@26439 -
This commit is contained in:
florian 2014-01-12 20:17:56 +00:00
parent 6e63272ab7
commit 98e5dead27
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
compiler/symsym.pas
View File

@ -189,10 +189,14 @@ interface
tabstractnormalvarsym = class(tabstractvarsym) tabstractnormalvarsym = class(tabstractvarsym)
defaultconstsym : tsym; defaultconstsym : tsym;
defaultconstsymderef : tderef; defaultconstsymderef : tderef;
localloc : TLocation; { register/reference for local var } { register/reference for local var }
initialloc : TLocation; { initial location so it can still be initialized later after the location was changed by SSA } localloc : TLocation;
currentregloc : TLocation; { current registers for register variables with moving register numbers } { initial location so it can still be initialized later after the location was changed by SSA }
inparentfpstruct : boolean; { migrated to a parentfpstruct because of nested access (not written to ppu, because not important and would change interface crc) } initialloc : TLocation;
{ current registers for register variables with moving register numbers }
currentregloc : TLocation;
{ migrated to a parentfpstruct because of nested access (not written to ppu, because not important and would change interface crc) }
inparentfpstruct : boolean;
constructor create(st:tsymtyp;const n : string;vsp:tvarspez;def:tdef;vopts:tvaroptions); constructor create(st:tsymtyp;const n : string;vsp:tvarspez;def:tdef;vopts:tvaroptions);
constructor ppuload(st:tsymtyp;ppufile:tcompilerppufile); constructor ppuload(st:tsymtyp;ppufile:tcompilerppufile);
function globalasmsym: boolean; function globalasmsym: boolean;