hedgewars/uGears.pas
changeset 1070 6371ecc10806
parent 1066 1f1b3686a2b0
child 1088 9702e17146e6
--- a/hedgewars/uGears.pas	Mon Jul 07 17:20:35 2008 +0000
+++ b/hedgewars/uGears.pas	Tue Jul 08 12:53:07 2008 +0000
@@ -405,7 +405,7 @@
 function WaterMachine: boolean;
 const
 	decStep: Longword = 0;
-	LastTurn: LongWord = 0;
+	LastTurn: LongInt = 0;
 var i: LongWord;
 begin
 if (decStep = 0) and (LastTurn < FinishedTurnsTotal) then