home *** CD-ROM | disk | FTP | other *** search
/ Aminet 7 / Aminet 7 - August 1995.iso / Aminet / misc / math / ExCalc.lha / ExCalcV1.0 / Source / InOutExt.mod < prev   
Encoding:
Text File  |  1995-05-08  |  940 b   |  31 lines
  1. (*********************************************************************)
  2. (*                                                                   *)
  3. (* Module InOutExt Copyright © 1995 by Computer Inspirations         *)
  4. (*                                                                   *)
  5. (* Design : Michael Griebling                                        *)
  6. (* Change : Original                                                 *)
  7. (*                                                                   *)
  8. (*********************************************************************)
  9.  
  10. MODULE InOutExt;
  11.  
  12. IMPORT io;
  13.  
  14.  
  15. (* +++++++++++++++++++++++++++++++++++++ *)
  16. PROCEDURE WriteLine * (OutBuff : ARRAY OF CHAR);
  17. (* $CopyArrays- *)
  18. BEGIN
  19.   io.WriteString(OutBuff); io.WriteLn;
  20. END WriteLine;
  21.  
  22.  
  23. (* +++++++++++++++++++++++++++++++++++++ *)
  24. PROCEDURE ReadLine * (VAR OutBuff : ARRAY OF CHAR);
  25. BEGIN
  26.   io.ReadString(OutBuff);
  27. END ReadLine;
  28.  
  29.  
  30. END InOutExt.
  31.