diff --git a/jcl/source/common/JclLogic.pas b/jcl/source/common/JclLogic.pas
index 1a3587e5f..c8e791416 100644
--- a/jcl/source/common/JclLogic.pas
+++ b/jcl/source/common/JclLogic.pas
@@ -1506,7 +1506,7 @@ function TestBit(const Value: Int64; const Bit: TBitRange): Boolean;
   BT     RAX, RDX
   SETC   AL
 end;
-{$ENDIF ~PUREPASCAL}
+{$ENDIF CPU64}
 
 function TestBitBuffer(const Value; const Bit: Cardinal): Boolean;
 {$IFDEF PUREPASCAL}