hedgewars/uGears.pas
changeset 698 43f3ef079f53
parent 689 f4ec46c48ed2
child 700 be4847674071
--- a/hedgewars/uGears.pas	Fri Jan 11 21:45:24 2008 +0000
+++ b/hedgewars/uGears.pas	Fri Jan 11 22:47:54 2008 +0000
@@ -965,6 +965,7 @@
         repeat
           inc(y, 2);
         until (y > 1023) or (CountNonZeroz(x, y, Gear^.Radius - 1) = 0);
+AddFileLog('x, sy = ' + inttostr(x) + ', ' + inttostr(y));
         sy:= y;
         repeat
           inc(y);