home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / M2V11-1.LHA / modula / m2 / InOut.def < prev    next >
Encoding:
Modula Definition  |  1994-07-31  |  548 b   |  21 lines
  1. DEFINITION MODULE InOut ;
  2.  
  3. VAR
  4.   done : BOOLEAN ;
  5.  
  6. (* Crude subset of PIM InOut, use ANSI_C StdIO instead *)
  7.  
  8. PROCEDURE Write( ch : CHAR ) ;
  9. PROCEDURE WriteLn ;
  10. PROCEDURE WriteString( str : ARRAY OF CHAR ) ;
  11. PROCEDURE WriteInt( x : LONGINT ; n : INTEGER ) ;
  12. PROCEDURE WriteOct( x : LONGINT ; n : INTEGER ) ;
  13. PROCEDURE WriteHex( x : LONGINT ; n : INTEGER ) ;
  14.  
  15. PROCEDURE Read         ( VAR ch : CHAR ) ;
  16. PROCEDURE ReadString ( VAR str : ARRAY OF CHAR ) ;
  17. PROCEDURE ReadInt    ( VAR x : INTEGER ) ;
  18. PROCEDURE ReadLongInt( VAR x : LONGINT ) ;
  19.  
  20. END InOut.
  21.