瀏覽代碼

* fixed references

git-svn-id: trunk@2554 -
florian 19 年之前
父節點
當前提交
05207fc54e
共有 1 個文件被更改,包括 1 次插入5 次删除
  1. 1 5
      compiler/dbgdwarf.pas

+ 1 - 5
compiler/dbgdwarf.pas

@@ -562,11 +562,7 @@ implementation
     procedure TDebugInfoDwarf.append_labelentry_ref(attr : tdwarf_attribute;sym : tasmsymbol);
       begin
         asmlist[al_dwarf_abbrev].concat(tai_const.create_uleb128bit(ord(attr)));
-{$ifdef cpu64bit}
-        asmlist[al_dwarf_abbrev].concat(tai_const.create_uleb128bit(ord(DW_FORM_ref8)));
-{$else cpu64bit}
-        asmlist[al_dwarf_abbrev].concat(tai_const.create_uleb128bit(ord(DW_FORM_ref4)));
-{$endif cpu64bit}
+        asmlist[al_dwarf_abbrev].concat(tai_const.create_uleb128bit(ord(DW_FORM_ref_addr)));
         asmlist[al_dwarf_info].concat(tai_const.create_sym(sym));
       end;