(*********************************************************************)
(*                                                                   *)
(* Module InOutExt Copyright © 1995 by Computer Inspirations         *)
(*                                                                   *)
(* Design : Michael Griebling                                        *)
(* Change : Original                                                 *)
(*                                                                   *)
(*********************************************************************)

MODULE InOutExt;

IMPORT io;


(* +++++++++++++++++++++++++++++++++++++ *)
PROCEDURE WriteLine * (OutBuff : ARRAY OF CHAR);
(* $CopyArrays- *)
BEGIN
  io.WriteString(OutBuff); io.WriteLn;
END WriteLine;


(* +++++++++++++++++++++++++++++++++++++ *)
PROCEDURE ReadLine * (VAR OutBuff : ARRAY OF CHAR);
BEGIN
  io.ReadString(OutBuff);
END ReadLine;


END InOutExt.