ifdefs all the way
authorkoda
Tue, 20 Oct 2009 21:22:16 +0000
changeset 2569 6f77dd38294a
parent 2568 e654cbfb23ba
child 2570 7093e3413594
ifdefs all the way
hedgewars/hwengine.pas
hedgewars/uWorld.pas
--- 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