Concatenated Stream Query

[robbins@DEC-HUDSON]

Given the following streams:

(setf stream-1 (make-string-input-stream "A line without a newline."))
(setf stream-2 (make-string-input-stream "Our generic second line."))
(setf stream-3 (make-concatenated-stream stream-1 stream-2))

What should (read-line stream-3) return,  I can imagine two possibilities

"A line without a newline.Our generic second line." t

"A line without a newline." nil

-- Rich