Переглянути джерело

msdos: enable FPC_STDOUT_TRUE_ALIAS by default

git-svn-id: trunk@38197 -
Károly Balogh 7 роки тому
батько
коміт
444d032607
1 змінених файлів з 3 додано та 0 видалено
  1. 3 0
      rtl/msdos/system.pp

+ 3 - 0
rtl/msdos/system.pp

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