|
@@ -2,7 +2,7 @@
|
|
{ $DEFINE DEBUG}
|
|
{ $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 TESTINCONSOLE}
|
|
{$I-}
|
|
{$I-}
|
|
uses
|
|
uses
|
|
Dos;
|
|
Dos;
|
|
@@ -24,10 +24,10 @@ const
|
|
{$DEFINE TESTCONSOLEOK}
|
|
{$DEFINE TESTCONSOLEOK}
|
|
{$ELSE}
|
|
{$ELSE}
|
|
*)
|
|
*)
|
|
- {$IFDEF CONSOLE}
|
|
|
|
|
|
+ {$IFDEF TESTINCONSOLE}
|
|
ConsoleDeviceName = '';
|
|
ConsoleDeviceName = '';
|
|
{$DEFINE TESTCONSOLEOK}
|
|
{$DEFINE TESTCONSOLEOK}
|
|
- {$ENDIF CONSOLE}
|
|
|
|
|
|
+ {$ENDIF TESTINCONSOLE}
|
|
{ $ENDIF}
|
|
{ $ENDIF}
|
|
{$ENDIF}
|
|
{$ENDIF}
|
|
|
|
|