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

+ added generation of debugging infos of parast and localst for methods

Browse Source 
git-svn-id: trunk@7038 -
This commit is contained in:
pierre 2007-03-30 21:34:55 +00:00
parent 4913e07019
commit 3473faab07
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/dbgbase.pas
View File

@ -125,6 +125,10 @@ implementation
insertdef(TAsmList(arg),pd.returndef);
if (po_virtualmethod in pd.procoptions) then
insertdef(TAsmList(arg),pd._class);
if assigned(pd.parast) then
write_symtable_defs(TAsmList(arg),pd.parast);
if assigned(pd.localst) then
write_symtable_defs(TAsmList(arg),pd.localst);
end;
end;