hedgewars/uFloat.pas
changeset 10562 3388822b3914
parent 10114 68a72af636c3
child 11046 47a8c19ecb60
--- a/hedgewars/uFloat.pas	Sat Nov 29 01:19:29 2014 +0100
+++ b/hedgewars/uFloat.pas	Sat Nov 29 03:13:06 2014 +0100
@@ -370,8 +370,8 @@
 
 function hwSqrt1(const t: hwFloat): hwFloat;
 const pwr = 8; // even value, feel free to adjust
-      rThreshold = 1 shl (pwr + 32);
-      lThreshold = 1 shl (pwr div 2 + 32);
+      rThreshold: QWord = 1 shl (pwr + 32);
+      lThreshold: QWord = 1 shl (pwr div 2 + 32);
 var l, r: QWord;
     c: hwFloat;
 begin