branch | hedgeroid |
changeset 5299 | ab899b056f77 |
parent 5286 | 22c1f4833a86 |
child 5639 | ebe9858eb6a3 |
5297:8315a70c35b6 | 5299:ab899b056f77 |
---|---|
259 |
259 |
260 |
260 |
261 procedure AddFileLog(s: shortstring); |
261 procedure AddFileLog(s: shortstring); |
262 begin |
262 begin |
263 s:= s; |
263 s:= s; |
264 WriteToConsole(s); |
|
265 {$IFDEF DEBUGFILE} |
264 {$IFDEF DEBUGFILE} |
266 {$IFDEF ANDROID} |
265 {$IFDEF ANDROID} |
267 WriteToConsole(s); |
266 WriteToConsole(s); |
268 {$ELSE} |
267 {$ELSE} |
269 writeln(f, GameTicks: 6, ': ', s); |
268 writeln(f, GameTicks: 6, ': ', s); |