Merged revisions 10642 via svnmerge from

svn+ssh://[email protected]/FPC/svn/fpc/trunk

........
r10642 | jonas | 2008-04-13 11:36:31 +0200 (Sun, 13 Apr 2008) | 3 lines

  * 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: branches/fixes_2_2@10662 -

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