Re: AW: vector-unzip Taylor Campbell 22 Apr 2003 16:12 UTC

On Tuesday, April 22, 2003, at 01:22 AM, Michael Burschik wrote:

> To quote from the reference implementation:
>
> ;; Convenient abbreviations for common unzipping.
> (define (vector-unzip1 vec)
>   (check-arg vector? vec 'vector-unzip1)
>   (vector-unzip vec 0))
> (define (vector-unzip2 vec)
>   (check-arg vector? vec 'vector-unzip2)
>   (vector-unzip vec 1))
> (define (vector-unzip3 vec)
>   (check-arg vector? vec 'vector-unzip3)
>   (vector-unzip vec 2))
> (define (vector-unzip4 vec)
>   (check-arg vector? vec 'vector-unzip4)
>   (vector-unzip vec 3))
> (define (vector-unzip5 vec)
>   (check-arg vector? vec 'vector-unzip5)
>   (vector-unzip vec 5))
>
> This would seem to corroborate my assumption that (vector-unzipn vec)
> ==
> (vector-unzip vec (- n 1)).
>
> But even if I am mistaken, my main point was the definition of
> vector-unzip5, which breaks the pattern.

To be more accurate, VECTOR-UNZIP[1-4] were wrong, while VECTOR-UNZIP5
was
written correctly.  I'll get a new copy of the reference implementation
and the
SRFI document up soon, fixing this all.

> Regards
>
> Michael Burschik
>