Browse Source

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 years ago
parent
commit
b073d2dac5
1 changed files with 1 additions and 2 deletions
  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');