home *** CD-ROM | disk | FTP | other *** search
/ Gold Fish 3 / goldfish_volume_3.bin / files / misc / math / excalc / 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.