Преглед изворни кода

+ apped end of symbol in TDebugInfoDwarf.afterappenddef

git-svn-id: branches/wasm@48510 -
nickysn пре 4 година
родитељ
комит
6f0a02a92d
1 измењених фајлова са 3 додато и 0 уклоњено
  1. 3 0
      compiler/dbgdwarf.pas

+ 3 - 0
compiler/dbgdwarf.pas

@@ -2248,6 +2248,9 @@ implementation
       var
         labsym : tasmsymbol;
       begin
+        { end of the symbol }
+        labsym:=def_dwarf_lab(def);
+        current_asmdata.asmlists[al_dwarf_info].concat(tai_symbol_end.Create(labsym));
         { create a derived reference type for pass-by-reference parameters }
         { (gdb doesn't support DW_AT_variable_parameter yet)               }
         labsym:=def_dwarf_ref_lab(def);