Tee.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Last edited by Peter Kessler, December 19, 1985 1:34:32 pm PST
DIRECTORY
IO USING [STREAM],
Rope USING [ROPE];
Procedures for copying a single input stream to a number of output streams. These are mostly designed to be used in command lines to check on the intermediate results of piped commands.
Tee:
CEDAR
DEFINITIONS = {
ToNames:
PROC [in:
IO.
STREAM, out:
IO.
STREAM, nameList:
LIST
OF Rope.
ROPE]
RETURNS [result:
REF ←
NIL, msg: Rope.
ROPE ←
NIL];
takes a list of names (in addition to input and output streams), and copies the input stream to the output stream and to each of the files named by the list of names.
ToStreams:
PROC [in:
IO.
STREAM, out:
IO.
STREAM, streamList:
LIST
OF
IO.
STREAM]
RETURNS [result:
REF ←
NIL, msg: Rope.
ROPE ←
NIL];
takes a list of already opened output streams (in addition to input and output streams), and copies the input stream to the output stream and to each of the streams in the list.
}.