--- a/hedgewars/uAI.pas	Sat May 05 16:04:55 2007 +0000
+++ b/hedgewars/uAI.pas	Sun May 06 14:53:56 2007 +0000
@@ -237,7 +237,7 @@
     end
 end;
 
-function Think(Me: Pointer): LongInt;
+function Think(Me: Pointer): integer;
 var BackMe, WalkMe: TGear;
     StartTicks: Longword;
 begin