hedgewars/uWorld.pas
changeset 107 b08ce0293a51
parent 97 e7c1df9cce2c
child 108 08f1fe6f21f8
--- a/hedgewars/uWorld.pas	Thu Aug 10 22:19:35 2006 +0000
+++ b/hedgewars/uWorld.pas	Fri Aug 11 16:17:50 2006 +0000
@@ -82,7 +82,7 @@
 var i, t: integer;
     r: TSDL_Rect;
     team: PTeam;
-    tdx, tdy: real;
+    tdx, tdy: Double;
 
     procedure DrawRepeated(spr: TSprite; Shift: integer);
     var i, w: integer;