You signed in with another tab or window. Reload to refresh your session.You signed out in another tab or window. Reload to refresh your session.You switched accounts on another tab or window. Reload to refresh your session.Dismiss alert
(defmethod unread-byte (byte (flexi-input-stream flexi-input-stream))
"Similar to UNREAD-CHAR in that it `unreads' the last octet from
STREAM. Note that you can only call UNREAD-BYTE after a corresponding
READ-BYTE."
(declare #.*standard-optimize-settings*)
(with-accessors ((last-octet flexi-stream-last-octet)
(octet-stack flexi-stream-octet-stack)
(position flexi-stream-position))
flexi-input-stream
(unless last-octet
(error 'flexi-stream-error
:stream stream
:format-control "No byte to unread from this stream \(or last reading operation read a character)."))
(unless (= byte last-octet)
(error 'flexi-stream-error
:stream stream
:format-control "Last byte read was different from #x~X."
:format-arguments (list byte)))
(setq last-octet nil)
(decf (the integer position))
(push byte octet-stack)
nil))
Should it be flexi-input-stream?
The text was updated successfully, but these errors were encountered:
It looks like stream is undefined here:
Should it be flexi-input-stream?
The text was updated successfully, but these errors were encountered: