--- a/hedgewars/uGearsUtils.pas	Sun Oct 14 18:45:11 2018 +0300
+++ b/hedgewars/uGearsUtils.pas	Sun Oct 14 18:52:00 2018 +0300
@@ -1055,8 +1055,7 @@
 end;
 
 function CheckGearNearImpl(Kind: TGearType; X, Y: hwFloat; rX, rY: LongInt; exclude: PGear): PGear;
-begin
-    var t: PGear;
+var t: PGear;
     width, dX, dY: hwFloat;
     bound: LongInt;
     isHit: Boolean;