ErrOutput added

rtl/beos/system.pp

@@ -508,6 +508,7 @@ begin
   StdErrorHandle:=2;
   OpenStdIO(Input,fmInput,StdInputHandle);
   OpenStdIO(Output,fmOutput,StdOutputHandle);
+  OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   OpenStdIO(StdOut,fmOutput,StdOutputHandle);
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
 end;
@@ -538,7 +539,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.17  2004-10-25 15:38:59  peter
+  Revision 1.18  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.17  2004/10/25 15:38:59  peter
     * compiler defined HEAP and HEAPSIZE removed
 
   Revision 1.16  2004/09/18 11:18:44  hajny

rtl/bsd/system.pp

@@ -161,6 +161,7 @@ procedure SysInitStdIO;
 begin
   OpenStdIO(Input,fmInput,StdInputHandle);
   OpenStdIO(Output,fmOutput,StdOutputHandle);
+  OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   OpenStdIO(StdOut,fmOutput,StdOutputHandle);
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
 end;
@@ -213,7 +214,10 @@ End.
 
 {
   $Log$
-  Revision 1.19  2004-07-17 15:31:03  jonas
+  Revision 1.20  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.19  2004/07/17 15:31:03  jonas
     * initialise StackLength (fixes stack checking in general, and tw2897 in
       particular)
 

rtl/emx/system.pas

@@ -1167,6 +1167,7 @@ begin
 *)
      OpenStdIO (Input, fmInput, StdInputHandle);
      OpenStdIO (Output, fmOutput, StdOutputHandle);
+     OpenStdIO (ErrOutput, fmOutput, StdErrorHandle);
      OpenStdIO (StdOut, fmOutput, StdOutputHandle);
      OpenStdIO (StdErr, fmOutput, StdErrorHandle);
 (*
@@ -1321,7 +1322,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.29  2004-10-25 15:38:59  peter
+  Revision 1.30  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.29  2004/10/25 15:38:59  peter
     * compiler defined HEAP and HEAPSIZE removed
 
   Revision 1.28  2004/09/18 11:12:49  hajny

rtl/go32v2/system.pp

@@ -1549,6 +1549,7 @@ procedure SysInitStdIO;
 begin
   OpenStdIO(Input,fmInput,StdInputHandle);
   OpenStdIO(Output,fmOutput,StdOutputHandle);
+  OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   OpenStdIO(StdOut,fmOutput,StdOutputHandle);
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
 end;
@@ -1602,7 +1603,10 @@ Begin
 End.
 {
   $Log$
-  Revision 1.42  2004-11-02 13:35:35  peter
+  Revision 1.43  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.42  2004/11/02 13:35:35  peter
     * second try for data too large
 
   Revision 1.41  2004/11/02 07:43:50  peter

rtl/inc/systemh.inc

@@ -358,6 +358,7 @@ Var
 {$endif SUPPORT_THREADVAR}
   ThreadID    : SizeUInt;
   { Standard In- and Output }
+  ErrOutput,
   Output,
   Input,
   StdOut,
@@ -769,7 +770,10 @@ const
 
 {
   $Log$
-  Revision 1.105  2004-10-30 20:49:10  marco
+  Revision 1.106  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.105  2004/10/30 20:49:10  marco
    * arraytostring added
 
   Revision 1.104  2004/10/14 17:39:33  florian

rtl/linux/system.pp

@@ -139,6 +139,7 @@ procedure SysInitStdIO;
 begin
   OpenStdIO(Input,fmInput,StdInputHandle);
   OpenStdIO(Output,fmOutput,StdOutputHandle);
+  OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   OpenStdIO(StdOut,fmOutput,StdOutputHandle);
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
 end;
@@ -184,7 +185,10 @@ End.
 
 {
   $Log$
-  Revision 1.18  2004-07-09 22:31:22  peter
+  Revision 1.19  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.18  2004/07/09 22:31:22  peter
     * fixed execpathstr setting
 
   Revision 1.17  2004/07/08 21:22:15  daniel

rtl/macos/system.pp

@@ -1106,6 +1106,7 @@ begin
   {$ifdef MACOS_USE_STDCLIB}
      OpenStdIO(Input,fmInput,StdInputHandle);
      OpenStdIO(Output,fmOutput,StdOutputHandle);
+     OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
      OpenStdIO(StdOut,fmOutput,StdOutputHandle);
      OpenStdIO(StdErr,fmOutput,StdErrorHandle);
   {$endif }
@@ -1199,7 +1200,10 @@ end.
 
 {
   $Log$
-  Revision 1.24  2004-10-25 15:38:59  peter
+  Revision 1.25  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.24  2004/10/25 15:38:59  peter
     * compiler defined HEAP and HEAPSIZE removed
 
   Revision 1.23  2004/10/19 19:56:59  olle

rtl/morphos/system.pp

@@ -856,6 +856,7 @@ begin
   { * MorphOS doesn't have a separate stderr, just like AmigaOS (???) * }
   StdErrorHandle:=StdOutputHandle;
   // OpenStdIO(StdErr,fmOutput,StdErrorHandle);
+  // OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
 end;
 
 
@@ -891,7 +892,10 @@ end.
 
 {
   $Log$
-  Revision 1.20  2004-10-25 15:38:59  peter
+  Revision 1.21  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.20  2004/10/25 15:38:59  peter
     * compiler defined HEAP and HEAPSIZE removed
 
   Revision 1.19  2004/09/03 19:26:15  olle

rtl/netware/system.pp

@@ -919,8 +919,10 @@ begin
 
   {$ifdef StdErrToConsole}
   AssignStdErrConsole(StdErr);
+  AssignStdErrConsole(ErrOutput);
   {$else}
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
+  OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   {$endif}
 end;
 
@@ -974,7 +976,10 @@ Begin
 End.
 {
   $Log$
-  Revision 1.29  2004-10-25 18:11:49  armin
+  Revision 1.30  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.29  2004/10/25 18:11:49  armin
   * saveregisters no longer supported by compiler, for now save all registers in stackcheck
 
   Revision 1.28  2004/10/25 15:38:59  peter

rtl/netwlibc/system.pp

@@ -1073,8 +1073,10 @@ begin
 
   {$ifdef StdErrToConsole}
   AssignStdErrConsole(StdErr);
+  AssignStdErrConsole(ErrOutput);
   {$else}
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
+  OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   {$endif}
 end;
 
@@ -1185,7 +1187,10 @@ Begin
 End.
 {
   $Log$
-  Revision 1.6  2004-10-25 18:11:49  armin
+  Revision 1.7  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.6  2004/10/25 18:11:49  armin
   * saveregisters no longer supported by compiler, for now save all registers in stackcheck
 
   Revision 1.5  2004/10/25 15:38:59  peter

rtl/os2/system.pas

@@ -1110,6 +1110,7 @@ begin
 *)
      OpenStdIO (Input, fmInput, StdInputHandle);
      OpenStdIO (Output, fmOutput, StdOutputHandle);
+     OpenStdIO (ErrOutput, fmOutput, StdErrorHandle);
      OpenStdIO (StdOut, fmOutput, StdOutputHandle);
      OpenStdIO (StdErr, fmOutput, StdErrorHandle);
 (*
@@ -1526,7 +1527,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.75  2004-10-25 15:38:59  peter
+  Revision 1.76  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.75  2004/10/25 15:38:59  peter
     * compiler defined HEAP and HEAPSIZE removed
 
   Revision 1.74  2004/09/18 11:12:09  hajny

rtl/posix/sysposix.inc

@@ -623,6 +623,7 @@ Begin
 { Setup stdin, stdout and stderr }
   OpenStdIO(Input,fmInput,StdInputHandle);
   OpenStdIO(Output,fmOutput,StdOutputHandle);
+  OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   OpenStdIO(StdOut,fmOutput,StdOutputHandle);
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
 { Reset IO Error }
@@ -631,7 +632,10 @@ End.
 *)
 {
  $Log$
- Revision 1.8  2004-10-25 15:38:59  peter
+ Revision 1.9  2004-11-04 09:32:31  peter
+ ErrOutput added
+
+ Revision 1.8  2004/10/25 15:38:59  peter
    * compiler defined HEAP and HEAPSIZE removed
 
  Revision 1.7  2002/11/14 12:18:03  marco

rtl/template/system.pp

@@ -273,6 +273,7 @@ Begin
 { Setup stdin, stdout and stderr }
   OpenStdIO(Input,fmInput,StdInputHandle);
   OpenStdIO(Output,fmOutput,StdOutputHandle);
+  OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   OpenStdIO(StdOut,fmOutput,StdOutputHandle);
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
 { Setup environment and arguments }
@@ -286,7 +287,10 @@ Begin
 End.
 {
   $Log$
-  Revision 1.13  2004-10-25 15:38:59  peter
+  Revision 1.14  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.13  2004/10/25 15:38:59  peter
     * compiler defined HEAP and HEAPSIZE removed
 
   Revision 1.12  2004/09/03 19:26:57  olle

rtl/watcom/system.pp

@@ -1480,6 +1480,7 @@ procedure SysInitStdIO;
 begin
   OpenStdIO(Input,fmInput,StdInputHandle);
   OpenStdIO(Output,fmOutput,StdOutputHandle);
+  OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
   OpenStdIO(StdOut,fmOutput,StdOutputHandle);
   OpenStdIO(StdErr,fmOutput,StdErrorHandle);
 end;
@@ -1531,7 +1532,10 @@ End.
 
 {
   $Log$
-  Revision 1.16  2004-10-25 15:38:59  peter
+  Revision 1.17  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.16  2004/10/25 15:38:59  peter
     * compiler defined HEAP and HEAPSIZE removed
 
   Revision 1.15  2004/09/03 19:27:16  olle

rtl/win32/initc.pp

@@ -106,8 +106,9 @@ initialization
 { Reinitialize std handles that can be changed }
   UpdateStdHandle(TextRec(Input),StdInputHandle,GetStdHandle(STD_INPUT_HANDLE));
   UpdateStdHandle(TextRec(Output),StdOutputHandle,GetStdHandle(STD_OUTPUT_HANDLE));
+  UpdateStdHandle(TextRec(ErrOutput),StdErrorHandle,GetStdHandle(STD_ERROR_HANDLE));
   TextRec(StdOut).Handle:=StdOutputHandle;
-  UpdateStdHandle(TextRec(Stderr),StdErrorHandle,GetStdHandle(STD_ERROR_HANDLE));
+  TextRec(StdErr).Handle:=StdErrorHandle;
 
 finalization
 { should we pass exit code ?
@@ -124,7 +125,10 @@ if setjmp(exitjmpbuf)=0 then
 end.
 {
   $Log$
-  Revision 1.12  2004-09-14 20:08:58  hajny
+  Revision 1.13  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.12  2004/09/14 20:08:58  hajny
     * use errno from cygwin (like in fixes branch)
 
   Revision 1.11  2004/09/12 17:41:40  hajny

rtl/win32/system.pp

@@ -1561,11 +1561,13 @@ begin
      AssignError(stdout);
      Assign(Output,'');
      Assign(Input,'');
+     Assign(ErrOutput,'');
    end
   else
    begin
      OpenStdIO(Input,fmInput,StdInputHandle);
      OpenStdIO(Output,fmOutput,StdOutputHandle);
+     OpenStdIO(ErrOutput,fmOutput,StdErrorHandle);
      OpenStdIO(StdOut,fmOutput,StdOutputHandle);
      OpenStdIO(StdErr,fmOutput,StdErrorHandle);
    end;
@@ -1606,7 +1608,10 @@ end.
 
 {
   $Log$
-  Revision 1.62  2004-10-25 15:38:59  peter
+  Revision 1.63  2004-11-04 09:32:31  peter
+  ErrOutput added
+
+  Revision 1.62  2004/10/25 15:38:59  peter
     * compiler defined HEAP and HEAPSIZE removed
 
   Revision 1.61  2004/09/03 19:27:25  olle