瀏覽代碼

* fixed debug info for enum types after r10189

git-svn-id: trunk@10197 -
Jonas Maebe 17 年之前
父節點
當前提交
84401d2226
共有 1 個文件被更改,包括 2 次插入1 次删除
  1. 2 1
      compiler/dbgstabs.pas

+ 2 - 1
compiler/dbgstabs.pas

@@ -575,7 +575,8 @@ implementation
             st:=st+GetSymName(p)+':'+tostr(p.value)+',';
             st:=st+GetSymName(p)+':'+tostr(p.value)+',';
             p:=p.nextenum;
             p:=p.nextenum;
           end;
           end;
-        st[length(st)]:=';';
+        { the final ',' is required to have a valid stabs }
+        st:=st+';';
         write_def_stabstr(list,def,st);
         write_def_stabstr(list,def,st);
       end;
       end;