peek-char

[Gabor Melis]

In PEEK-CHAR (stream.lisp) I found this:

(eof-or-lose stream (or eof-errorp recursive-p) eof-value))

after getting eof errors regardless of passing nil for eof-error-p if 
recursive-p was true. Is this the intended behaviour?

Gabor Melis