From: Christophe R. <cr...@us...> - 2003-10-20 16:37:52
|
Update of /cvsroot/sbcl/sbcl/src/code In directory sc8-pr-cvs1:/tmp/cvs-serv24578/src/code Modified Files: stream.lisp Log Message: 0.8.4.37: Fix bug 46k: READ-BYTE on STRING-INPUT-STREAMs ... add a test ... some other BUGS filtrage (BIT-VECTOR is required to be disjoint from SIMPLE-VECTOR; other fixed bugs) Index: stream.lisp =================================================================== RCS file: /cvsroot/sbcl/sbcl/src/code/stream.lisp,v retrieving revision 1.47 retrieving revision 1.48 diff -u -d -r1.47 -r1.48 --- stream.lisp 18 Sep 2003 16:43:56 -0000 1.47 +++ stream.lisp 20 Oct 2003 15:29:21 -0000 1.48 @@ -1085,7 +1085,7 @@ (defstruct (string-input-stream (:include string-stream (in #'string-inch) - (bin #'string-binch) + (bin #'ill-bin) (n-bin #'string-stream-read-n-bytes) (misc #'string-in-misc) (string (missing-arg) :type simple-string)) |