hedgewars/uFloat.pas
changeset 15775 72f735c03fec
parent 15649 ea189ee9394f
child 15925 d2dafe1b25f5
--- a/hedgewars/uFloat.pas	Thu Oct 22 12:33:35 2020 +0200
+++ b/hedgewars/uFloat.pas	Thu Oct 22 12:50:24 2020 +0200
@@ -371,8 +371,8 @@
 
 function hwSqrt1(const t: hwFloat): hwFloat;
 const pwr = 8; // even value, feel free to adjust
-      rThreshold: QWord = 1 shl (pwr + 32);
-      lThreshold: QWord = 1 shl (pwr div 2 + 32);
+      rThreshold: QWord = QWord(1) shl (pwr + 32);
+      lThreshold: QWord = QWord(1) shl (pwr div 2 + 32);
 var l, r: QWord;
     c: hwFloat;
 begin