[zip-cvs] CVS zip
dlichteblau
dlichteblau at common-lisp.net
Wed Apr 12 20:29:35 UTC 2006
Update of /project/zip/cvsroot/zip
In directory clnet:/tmp/cvs-serv9082
Modified Files:
gray.lisp
Log Message:
fixed buffer-output-stream
--- /project/zip/cvsroot/zip/gray.lisp 2006/03/19 14:01:09 1.5
+++ /project/zip/cvsroot/zip/gray.lisp 2006/04/12 20:29:35 1.6
@@ -21,7 +21,8 @@
while c
do (write-char c out*))))))
-(defclass buffer-output-stream (fundamental-binary-output-stream)
+(defclass buffer-output-stream
+ (trivial-gray-stream-mixin fundamental-binary-output-stream)
((buf :initarg :buf :accessor buf)
(pos :initform 0 :accessor pos)))
More information about the Zip-cvs
mailing list