Selaa lähdekoodia

------------------------------------------------------------------------
r42199 | pierre | 2019-06-09 20:59:06 +0000 (Sun, 09 Jun 2019) | 1 line

Use use_tag_types everywhere to get consistent results for 'Tt' versus 't' for stabs for string definitions
------------------------------------------------------------------------
--- Merging r42199 into '.':
U compiler/dbgstabs.pas
U compiler/dbgstabx.pas
--- Recording mergeinfo for merge of r42199 into '.':
U .

git-svn-id: branches/fixes_3_2@49422 -

pierre 4 vuotta sitten
vanhempi
commit
180f6541bd
2 muutettua tiedostoa jossa 2 lisäystä ja 2 poistoa
  1. 1 1
      compiler/dbgstabs.pas
  2. 1 1
      compiler/dbgstabx.pas

+ 1 - 1
compiler/dbgstabs.pas

@@ -1634,7 +1634,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;