fix building without DEBUGFILE
authorkoda
Sat, 03 Apr 2010 14:59:41 +0000
changeset 3295 ced0ee8280ad
parent 3294 0faf8a2d6066
child 3296 604fe135623a
fix building without DEBUGFILE
hedgewars/uMisc.pas
hedgewars/uRandom.pas
--- 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;