소스 검색

* 64bit fix

peter 21 년 전
부모
커밋
7559d7050e
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      fcl/image/fpimgcmn.pp

+ 1 - 1
fcl/image/fpimgcmn.pp

@@ -112,7 +112,7 @@ begin
     begin
     t := (byte(result) xor d^);
     result := CRCtable[t] xor (result shr 8);
-    inc (longword(d));
+    inc (d);
     end;
 end;