ANY NONE
class interface STANDARD_STREAMS
   --
   -- Thanks to this standard_streams singleton object, you can redirect io, std_input, std_output as
   -- well as std_error. (See also examples from our tutorial/io directory.)
   --

creation
   make

feature(s) from STANDARD_STREAMS
   io: STD_INPUT_OUTPUT

   std_input: INPUT_STREAM

   std_output: OUTPUT_STREAM

   std_error: OUTPUT_STREAM

feature(s) from STANDARD_STREAMS
   set_std_input (a_std_input: INPUT_STREAM)
      require
         a_std_input.is_connected

   restore_std_input

   set_std_output (a_std_output: OUTPUT_STREAM)
      require
         a_std_output.is_connected

   restore_std_output

   set_std_error (a_std_error: OUTPUT_STREAM)
      require
         a_std_error.is_connected

   restore_std_error

feature(s) from STANDARD_STREAMS
   system_std_input: STD_INPUT

   system_std_output: STD_OUTPUT

   system_std_error: STD_ERROR

feature(s) from STANDARD_STREAMS
   make

feature(s) from STANDARD_STREAMS
   singleton: STANDARD_STREAMS


invariant

    Current = singleton;

    std_input /= Void;

    std_output /= Void;

    std_error /= Void;

    io /= Void;

end of STANDARD_STREAMS