2
0
Эх сурвалжийг харах

Add missing token buffer index update for ST_LOADMESSAGES handling

Pierre Muller 1 жил өмнө
parent
commit
2ed2ca5cf0

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

@@ -2722,6 +2722,7 @@ begin
                   end;
                 ST_LOADMESSAGES:
                   begin
+                    inc(tbi);
                     mesgnb:=gettokenbufsizeint;;
                     writeln([space,mesgnb,' messages: ']);
                     for nb:=1 to mesgnb do