--- a/hedgewars/GSHandlers.inc	Tue Jun 29 10:18:51 2010 -0400
+++ b/hedgewars/GSHandlers.inc	Tue Jun 29 18:06:50 2010 +0200
@@ -1197,7 +1197,8 @@
         end;
         nx := nx - tx;
         ny := ny - ty;
-        len := len - _0_3 // should be the same as increase step
+        // len := len - _0_3 // should be the same as increase step
+        len.QWordValue := len.QWordValue - _0_3.QWordValue;
     end;
 
     if not haveDivided then