소스 검색

Fix crash for GenConstraints handling

git-svn-id: trunk@37209 -
pierre 8 년 전
부모
커밋
e1dbb5edcb
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      compiler/utils/ppuutils/ppudump.pp

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

@@ -1721,7 +1721,7 @@ begin
         end;
       writeln;
 
-      len:=ppufile.getasizeint;
+      len:=ppufile.getlongint;
       if len>0 then
         begin
           space:='    '+space;