Browse Source

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

git-svn-id: trunk@7038 -
pierre 18 years ago
parent
commit
3473faab07
1 changed files with 4 additions and 0 deletions
  1. 4 0
      compiler/dbgbase.pas

+ 4 - 0
compiler/dbgbase.pas

@@ -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;