浏览代码

Fix a bug in ppudump that seems to be there since revision 1.

compiler/utils/pputils/ppudump.pp, readsymbols:
  * ibstartsyms only contains one longint, namely the count of the symbols, not two

git-svn-id: trunk@33887 -
svenbarth 9 年之前
父节点
当前提交
b073d2dac5
共有 1 个文件被更改,包括 1 次插入2 次删除
  1. 1 2
      compiler/utils/ppuutils/ppudump.pp

+ 1 - 2
compiler/utils/ppuutils/ppudump.pp

@@ -2334,8 +2334,7 @@ begin
       Writeln([space,'------ ',s,' ------']);
       Writeln([space,'------ ',s,' ------']);
      if readentry=ibstartsyms then
      if readentry=ibstartsyms then
       begin
       begin
-        Writeln([space,'Symtable datasize : ',getlongint]);
-        Writeln([space,'Symtable alignment: ',getlongint]);
+        Writeln([space,'Symtable count: ',getlongint]);
       end
       end
      else
      else
       Writeln('!! ibstartsym not found');
       Writeln('!! ibstartsym not found');