瀏覽代碼

Use use_tag_types everywhere to get consistent results for 'Tt' versus 't' for stabs for string definitions

git-svn-id: trunk@42199 -
pierre 6 年之前
父節點
當前提交
14b9032ef2
共有 2 個文件被更改,包括 2 次插入2 次删除
  1. 1 1
      compiler/dbgstabs.pas
  2. 1 1
      compiler/dbgstabx.pas

+ 1 - 1
compiler/dbgstabs.pas

@@ -1642,7 +1642,7 @@ implementation
         ss:='';
         if not assigned(sym.typedef) then
           internalerror(200509262);
-        if sym.typedef.typ in tagtypes then
+        if use_tag_prefix(sym.typedef) then
           stabchar:=tagtypeprefix
         else
           stabchar:='t';

+ 1 - 1
compiler/dbgstabx.pas

@@ -158,7 +158,7 @@ implementation
           declstabnr:=def_stab_number(def)
         end;
       if (symname='') or
-         not(def.typ in tagtypes) then
+         not(use_tag_types(def)) then
         begin
           st:=def_stabstr_evaluate(def,':$1$2=',[stabchar,declstabnr]);
           st:='"'+def_stabstr_evaluate(def,symname,[])+st+ss;