Bläddra i källkod

* fixed typo in r10602 causing the names of all record structures of
classes to be replaced with "sym_name" in the debuginfo

git-svn-id: trunk@10642 -

Jonas Maebe 17 år sedan
förälder
incheckning
81ad9ea6e8
1 ändrade filer med 1 tillägg och 1 borttagningar
  1. 1 1
      compiler/dbgstabs.pas

+ 1 - 1
compiler/dbgstabs.pas

@@ -484,7 +484,7 @@ implementation
           pointer to the struct), otherwise gdb crashes (see tests/webtbs/tw9766.pp) }
         if is_class(def) and
            tobjectdef(def).writing_class_record_dbginfo then
-          st:=def_stabstr_evaluate(def,'"{$sym_name}:$1$2=',[stabchar,def_stab_classnumber(tobjectdef(def))])
+          st:=def_stabstr_evaluate(def,'"${sym_name}:$1$2=',[stabchar,def_stab_classnumber(tobjectdef(def))])
         else
           begin
             { Type names for types defined in the current unit are already written in