Jelajahi Sumber

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 tahun lalu
induk
melakukan
b073d2dac5
1 mengubah file dengan 1 tambahan dan 2 penghapusan
  1. 1 2
      compiler/utils/ppuutils/ppudump.pp

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

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