[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