Jon Boone pushed to branch issue-143-ansi-compliance-failure-listen-extra-argument at cmucl / cmucl
Commits:
-
4ad74293
by Jon Boone at 2023-05-04T12:10:06-04:00
1 changed file:
Changes:
| ... | ... | @@ -606,9 +606,9 @@ |
| 606 | 606 | |
| 607 | 607 | (defun listen (&optional (stream *standard-input*) (width 1 width-p))
|
| 608 | 608 | _N"Returns T if a character is available on the given Stream.
|
| 609 | - Argument width is only used by streams of type simple-stream.
|
|
| 610 | - If stream is of type lisp-stream or fundamental-stream,
|
|
| 611 | - passing more than one argument is invalid. "
|
|
| 609 | + Argument Width is only used by instances of SIMPLE-STREAM. If
|
|
| 610 | + Stream is a LISP-STREAM or FUNDAMENTAL-STREAM, passing more
|
|
| 611 | + than one argument is invalid."
|
|
| 612 | 612 | (declare (type streamlike stream))
|
| 613 | 613 | (let ((stream (in-synonym-of stream)))
|
| 614 | 614 | (stream-dispatch stream
|