![[XANALYS]](../Graphics/XanSmall.gif)
Syntax:
make-echo-stream input-stream output-stream => echo-stream
Arguments and Values:
input-stream---an input stream.
output-stream---an output stream.
echo-stream---an echo stream.
Description:
Creates and returns an echo stream that takes input from input-stream and sends output to output-stream.
Examples:
(let ((out (make-string-output-stream)))
(with-open-stream
(s (make-echo-stream
(make-string-input-stream "this-is-read-and-echoed")
out))
(read s)
(format s " * this-is-direct-output")
(get-output-stream-string out)))
=> "this-is-read-and-echoed * this-is-direct-output"
Side Effects: None.
Affected By: None.
Exceptional Situations: None.
See Also:
echo-stream-input-stream, echo-stream-output-stream, make-two-way-stream
Notes: None.