mirror of
https://github.com/pmai/Deflate.git
synced 2025-12-21 21:14:29 +01:00
@ -68,7 +68,7 @@
|
|||||||
;;;
|
;;;
|
||||||
|
|
||||||
(defclass octet-input-stream (fundamental-binary-input-stream)
|
(defclass octet-input-stream (fundamental-binary-input-stream)
|
||||||
((data :initarg :data :type (simple-array (*) (unsigned-byte 8)))
|
((data :initarg :data :type (simple-array (unsigned-byte 8) (*)))
|
||||||
(position :initform 0)))
|
(position :initform 0)))
|
||||||
|
|
||||||
(defmethod stream-element-type ((stream octet-input-stream))
|
(defmethod stream-element-type ((stream octet-input-stream))
|
||||||
|
|||||||
Reference in New Issue
Block a user