home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / programming / languages / turbo_part1.lha / modula / m2 / Raw.def < prev    next >
Encoding:
Modula Definition  |  1994-12-28  |  616 b   |  20 lines
  1. DEFINITION MODULE Raw ;
  2.  
  3. (* Sets the CLI window to RAW/COOKED, note that the functions in the this *)
  4. (* module wont effect the buffering done by StdIO & FIO.          *)
  5. (* Use the coresponding functions, StdIO.setvbuf & FIO.SetBuffer instead. *)
  6. (* Only use this module when doing Dos IO calls directly to "*".      *)
  7.  
  8. VAR
  9.   done  : BOOLEAN ;
  10.  
  11. PROCEDURE SetConsoleRaw( ) ;
  12. (* Sets console to RAW, done=TRUE if operation succeeded, FALSE otherwise *)
  13.  
  14. PROCEDURE SetConsoleCooked( ) ;
  15. (* Sets console to COOKED, done=TRUE if operation succeeded, FALSE otherwise *)
  16.  
  17. (* Exit code always resets console to cooked *)
  18. END Raw.
  19.  
  20.