hedgewars/uUtils.pas
branchhedgeroid
changeset 5286 22c1f4833a86
parent 5239 f34f391a223b
child 5299 ab899b056f77
--- a/hedgewars/uUtils.pas	Tue Jun 21 17:28:53 2011 -0400
+++ b/hedgewars/uUtils.pas	Wed Jun 22 00:38:31 2011 +0200
@@ -21,7 +21,7 @@
 unit uUtils;
 
 interface
-uses uTypes, uFloat, GLunit;
+uses uTypes, uFloat, GLunit, uConsole;
 
 procedure SplitBySpace(var a, b: shortstring);
 procedure SplitByChar(var a, b: ansistring; c: char);
@@ -261,10 +261,15 @@
 procedure AddFileLog(s: shortstring);
 begin
 s:= s;
+WriteToConsole(s);
 {$IFDEF DEBUGFILE}
+{$IFDEF ANDROID}
+ WriteToConsole(s);
+{$ELSE}
 writeln(f, GameTicks: 6, ': ', s);
 flush(f)
 {$ENDIF}
+{$ENDIF}
 end;