(*
    Title:      StringIO - Definitions
    LastEdit:	Wed May 23 14:58:39 1984
    Author: 	Mick Jordan; hacked by LDS
		Acorn Research Centre; Acorn Computers VLSIC Design Aids Gp.
*)

DEFINITION MODULE StringIO;

FROM Streams IMPORT STREAM;

EXPORT QUALIFIED FindInput, FindOutput;

PROCEDURE FindInput(VAR s : ARRAY OF CHAR): STREAM;
  (* The characters in s are returned followed by a 0C, *)
  (* as the result of a series of calls to Streams.Get. *)

PROCEDURE FindOutput(VAR string: ARRAY OF CHAR; index: CARDINAL): STREAM;
  (* Characters output by Streams.Put are stored in successive   *)
  (* locations in 'string', starting at 'index'. Streams.Delete  *)
  (* on the stream causes a 0C to be appended. Stream^.Status    *)
  (* will be set to StreamError if the high bound of the array   *)
  (* is exceeded and Stream^.ErrorCode will be set to -1.        *)

END StringIO .
