Przeglądaj źródła

msdos: enable FPC_STDOUT_TRUE_ALIAS by default

git-svn-id: trunk@38197 -
Károly Balogh 7 lat temu
rodzic
commit
444d032607
1 zmienionych plików z 3 dodań i 0 usunięć
  1. 3 0
      rtl/msdos/system.pp

+ 3 - 0
rtl/msdos/system.pp

@@ -23,6 +23,7 @@ interface
 
 { Use Ansi Char for files }
 {$define FPC_ANSI_TEXTFILEREC}
+{$define FPC_STDOUT_TRUE_ALIAS}
 
 {$ifdef NO_WIDESTRINGS}
   { Do NOT use wide Char for files }
@@ -654,8 +655,10 @@ begin
   OpenStdIO(Input,fmInput,StdInputHandle);
   OpenStdIO(Output,fmOutput,StdOutputHandle);
   OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
+{$ifndef FPC_STDOUT_TRUE_ALIAS}
   OpenStdIO(StdOut,fmOutput,StdOutputHandle);
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
+{$endif FPC_STDOUT_TRUE_ALIAS}
 end;
 
 function GetProcessID: SizeUInt;