--- a/hedgewars/uMisc.pas	Tue Jul 07 22:02:13 2009 +0000
+++ b/hedgewars/uMisc.pas	Wed Jul 08 12:53:36 2009 +0000
@@ -569,8 +569,10 @@
 RectToStr:= '(x: ' + inttostr(rect.x) + '; y: ' + inttostr(rect.y) + '; w: ' + inttostr(rect.w) + '; h: ' + inttostr(rect.h) + ')'
 end;
 
+{$IFNDEF IPHONEOS}
 var i: LongInt;
 {$ENDIF}
+{$ENDIF}
 
 initialization
 cDrownSpeed.QWordValue:= 257698038;// 0.06
@@ -600,7 +602,7 @@
 finalization
 //uRandom.DumpBuffer;
 
-writeln(f, 'halt at ',GameTicks,' ticks');
+writeln(f, 'halt at ', GameTicks, ' ticks');
 flush(f);
 close(f)