out.sa

 
---------------------------> Sather 1.1 source file <--------------------------
-- Copyright (C) International Computer Science Institute, 1994.  COPYRIGHT  --
-- NOTICE: This code is provided "AS IS" WITHOUT ANY WARRANTY and is subject --
-- to the terms of the SATHER LIBRARY GENERAL PUBLIC LICENSE contained in    --
-- the file "Doc/License" of the Sather distribution.  The license is also   --
-- available from ICSI, 1947 Center St., Suite 600, Berkeley CA 94704, USA.  --
--------> Please email comments to sather-bugs@icsi.berkeley.edu. <----------

-- out.sa: Output on stdout.


class OUT < $OSTREAM 
class OUT < $OSTREAM is
   -- Direct access to stdout.
   
   create:SAME is return self end;
   
   plus(s:$STR):SAME is 
      -- Print `s' on stdout and return self.
      
      FILE::stdout.plus(s);
      return self;
   end;
   
   plus(s:STR):SAME is 
      -- Print `s' on stdout and return self.
      
      FILE::stdout.plus(s);
      return self;
   end;   
   
   plus(s:$STR) is
      FILE::stdout.plus(s)
   end;
   
   plus(s:STR) is
      FILE::stdout.plus(s)
   end;
   
   flush is
      -- Flush buffers.
      FILE::stdout.flush
   end;
   
end; -- class OUT