1.0.10.44: BUFFER-P, not BUFFERP
authorNikodemus Siivola <nikodemus@random-state.net>
Thu, 11 Oct 2007 13:13:07 +0000 (13:13 +0000)
committerNikodemus Siivola <nikodemus@random-state.net>
Thu, 11 Oct 2007 13:13:07 +0000 (13:13 +0000)
 * Reported by Yuri Vishnevsky on sbcl-devel.

 * Test-case coming Real Soon.

src/code/fd-stream.lisp
version.lisp-expr

index b327e07..98df2d4 100644 (file)
   (let ((ibuf (fd-stream-ibuf fd-stream))
         (obuf (fd-stream-obuf fd-stream))
         (queue (loop for item in (fd-stream-output-queue fd-stream)
-                       when (bufferp item)
+                       when (buffer-p item)
                        collect (reset-buffer item))))
     (when ibuf
       (push (reset-buffer ibuf) queue))
index ca2ed52..a90afb9 100644 (file)
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.10.43"
+"1.0.10.44"