hedgewars/uAIAmmoTests.pas
changeset 12621 d972b31f8881
parent 12193 71c47122fbc0
child 12898 8a40ce061d94
--- a/hedgewars/uAIAmmoTests.pas	Sat Sep 30 20:31:07 2017 +0200
+++ b/hedgewars/uAIAmmoTests.pas	Sat Sep 30 21:54:47 2017 +0200
@@ -254,7 +254,7 @@
 function TestBee(Me: PGear; Targ: TTarget; Level: LongInt; var ap: TAttackParams): LongInt;
 var i, j: LongInt;
     valueResult, v, a, p: LongInt;
-    mX, mY, dX: real;
+    mX, mY: real;
     eX, eY: LongInt;
 begin
     if Level > 1 then