소스 검색

* Fix 32-bit compilation

(cherry picked from commit ba534b1192e3358638c5a1b5d6e8192466dea6ca)
Michaël Van Canneyt 2 년 전
부모
커밋
2b8ca38e79
1개의 변경된 파일2개의 추가작업 그리고 0개의 파일을 삭제
  1. 2 0
      packages/fcl-image/src/fpreadtiff.pas

+ 2 - 0
packages/fcl-image/src/fpreadtiff.pas

@@ -183,12 +183,14 @@ begin
     Result:= SwapEndian(d);
 end;
 
+{$ifdef CPU64}
 function TFPReaderTiff.FixEndian(q: QWord): QWord;
 begin
   Result:=q;
   if FReverseEndian
   then Result:= SwapEndian(q);
 end;
+{$endif}
 
 procedure TFPReaderTiff.TiffError(Msg: string);
 begin