equal
deleted
inserted
replaced
26 procedure WriteLnToConsole(s: shortstring); |
26 procedure WriteLnToConsole(s: shortstring); |
27 |
27 |
28 var lastConsoleline : shortstring; |
28 var lastConsoleline : shortstring; |
29 |
29 |
30 implementation |
30 implementation |
31 uses Types, uUtils {$IFDEF ANDROID}, log in 'log.pas'{$ENDIF}; |
31 uses uUtils {$IFDEF ANDROID}, log in 'log.pas'{$ENDIF}; |
32 |
32 |
33 |
33 |
34 procedure WriteToConsole(s: shortstring); |
34 procedure WriteToConsole(s: shortstring); |
35 begin |
35 begin |
36 {$IFNDEF NOCONSOLE} |
36 {$IFNDEF NOCONSOLE} |