瀏覽代碼

Generate mimnimal DWARF debug information for non-multithreaded thread variables

git-svn-id: trunk@29150 -
pierre 10 年之前
父節點
當前提交
3506767e8d
共有 1 個文件被更改,包括 6 次插入1 次删除
  1. 6 1
      compiler/dbgdwarf.pas

+ 6 - 1
compiler/dbgdwarf.pas

@@ -2404,7 +2404,12 @@ implementation
                     if (vo_is_thread_var in sym.varoptions) then
                       begin
 { TODO: !!! FIXME: dwarf for thread vars !!!}
-                        blocksize:=0;
+{ This is only a minimal change to at least be able to get a value
+  in only one thread is present PM 2014-11-21, like for stabs format }
+                        templist.concat(tai_const.create_8bit(ord(DW_OP_addr)));
+                        templist.concat(tai_const.Create_type_name(aitconst_ptr,sym.mangledname,
+                          offset+sizeof(pint)));
+                        blocksize:=1+sizeof(puint);
                       end
                     else
                       begin