|
@@ -1,5 +1,5 @@
|
|
-{$DEFINE VERBOSE}
|
|
|
|
-{$DEFINE DEBUG}
|
|
|
|
|
|
+{ $DEFINE VERBOSE}
|
|
|
|
+{ $DEFINE DEBUG}
|
|
(* Define the following if the test will be run manually in a console *)
|
|
(* Define the following if the test will be run manually in a console *)
|
|
(* (no output redirection) - otherwise the test will fail for some targets. *)
|
|
(* (no output redirection) - otherwise the test will fail for some targets. *)
|
|
{ $DEFINE CONSOLE}
|
|
{ $DEFINE CONSOLE}
|
|
@@ -18,12 +18,12 @@ const
|
|
ConsoleDeviceName = 'CON';
|
|
ConsoleDeviceName = 'CON';
|
|
{$DEFINE TESTCONSOLEOK}
|
|
{$DEFINE TESTCONSOLEOK}
|
|
{$ELSE}
|
|
{$ELSE}
|
|
-{ {$IF DEFINED(UNIX)}
|
|
|
|
-(* I don't know whether there's a device on Unix allowing to enforce output to console even if standard output is redirected for the given process... *)
|
|
|
|
|
|
+(* {$IF DEFINED(UNIX)}
|
|
|
|
+{ I don't know whether there's a device on Unix allowing to enforce output to console even if standard output is redirected for the given process... }
|
|
ConsoleDeviceName = '/dev/tty';
|
|
ConsoleDeviceName = '/dev/tty';
|
|
{$DEFINE TESTCONSOLEOK}
|
|
{$DEFINE TESTCONSOLEOK}
|
|
{$ELSE}
|
|
{$ELSE}
|
|
-}
|
|
|
|
|
|
+*)
|
|
{$IFDEF CONSOLE}
|
|
{$IFDEF CONSOLE}
|
|
ConsoleDeviceName = '';
|
|
ConsoleDeviceName = '';
|
|
{$DEFINE TESTCONSOLEOK}
|
|
{$DEFINE TESTCONSOLEOK}
|