[zip-cvs] CVS zip

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)))