[slime-devel] transpose-lists

[Brian Downing]

On Tue, Aug 09, 2005 at 09:49:30PM +0200, Pascal Bourguignon wrote:
> Is it the sun? Are we becoming silly?
> 
> (defun transpose-lists (lists) 
>   (apply (function mapcar) (function list) lists))
> 
> [4]> (transpose-lists '((1 2 ) (one two three) ()))
> NIL
> [5]> (transpose-lists '((1 2 ) (one two three)))
> ((1 ONE) (2 TWO))
> [6]> 

Edi originally wrote:

> I've just committed a new implementation of TRANSPOSE-LISTS (see
> below) because the old one (although it was cute) had problems with
> CALL-ARGUMENTS-LIMIT.

I think you've re-invented the old implementation.  :)

-bcd