--- a/hedgewars/uMisc.pas	Sat Apr 03 14:54:49 2010 +0000
+++ b/hedgewars/uMisc.pas	Sat Apr 03 14:59:41 2010 +0000
@@ -651,7 +651,7 @@
 
 
 procedure initModule;
-{$IFNDEF IPHONEOS}var i: LongInt;{$ENDIF}
+{$IFDEF DEBUGFILE}var i: LongInt;{$ENDIF}
 begin
     cDrownSpeed.QWordValue  := 257698038;       // 0.06
     cMaxWindSpeed.QWordValue:= 2147484;     // 0.0005

--- a/hedgewars/uRandom.pas	Sat Apr 03 14:54:49 2010 +0000
+++ b/hedgewars/uRandom.pas	Sat Apr 03 14:59:41 2010 +0000
@@ -35,9 +35,8 @@
 {$ENDIF}
 
 implementation
-{$IFDEF DEBUGFILE}
-uses uMisc, uConsole;
-{$ENDIF}
+uses uMisc{$IFDEF DEBUGFILE},uConsole{$ENDIF};
+
 var cirbuf: array[0..63] of Longword;
     n: byte;