--- a/hedgewars/hwengine.pas	Tue Oct 20 21:20:47 2009 +0000
+++ b/hedgewars/hwengine.pas	Tue Oct 20 21:22:16 2009 +0000
@@ -163,9 +163,11 @@
 var PrevTime,
     CurrTime: Longword;
     event: TSDL_Event;
+{$IFDEF IPHONEOS}
     mouseState, whichMouse: byte;
     x, y, x_up, y_up, x_down, y_down: LongInt;
     oldy: LongInt = 240;
+{$ENDIF}
 begin
 PrevTime:= SDL_GetTicks;
 repeat

--- a/hedgewars/uWorld.pas	Tue Oct 20 21:20:47 2009 +0000
+++ b/hedgewars/uWorld.pas	Tue Oct 20 21:22:16 2009 +0000
@@ -319,7 +319,9 @@
     tdx, tdy: Double;
     grp: TCapGroup;
     s: string[15];
+{$IFDEF IPHONEOS}
     x,y: LongInt;
+{$ENDIF}
     offset: LongInt;
 begin
 if ZoomValue < zoom then