소스 검색

* 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 년 전
부모
커밋
81ad9ea6e8
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  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