[zip-devel] Typo in STREAM-READ-SEQUENCE (Was: NIL vs. :UNSPECIFIC)

[Edi Weitz]

On Fri, 11 Aug 2006 16:04:38 +0200, David Lichteblau <david at lichteblau.com> wrote:

> Checked in.  Please test.

Yep, that works fine for me now.

But here's another one:

--- zip/gray.lisp       2006-04-12 22:35:33.000000000 +0200
+++ /cygdrive/c/home/lisp/zip/gray.lisp 2006-08-14 00:20:19.071252800 +0200
@@ -63,8 +63,8 @@
   (let* ((n (- end start))
         (max (- (size s) (pos s)))
         (result
-         (read-sequence (input-handle s)
-                        seq
+         (read-sequence seq
+                        (input-handle s)
                         :start start
                         :end (+ start (min n max)))))
     (incf (pos s) (- result start))

Cheers,
Edi.