Path: archiver1.google.com!news2.google.com!news.maxwell.syr.edu!elnk-pas-nf1!newsfeed.earthlink.net!cyclone.socal.rr.com!cyclone2.kc.rr.com!news2.kc.rr.com!twister.socal.rr.com.POSTED!53ab2750!not-for-mail
From: Luke J Crook <lcl...@NO-SPAM.hd-plus.com>
User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.6b) Gecko/20031205 Thunderbird/0.4
X-Accept-Language: en-us, en
MIME-Version: 1.0
Newsgroups: comp.lang.lisp
Subject: Re: First macro
References: <ee7cb8ad.0401071425.41f70484@posting.google.com> <m3hdz3270x.fsf@buss-14250.user.cis.dfn.de>
In-Reply-To: <m3hdz3270x.fsf@buss-14250.user.cis.dfn.de>
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 8bit
Lines: 13
Message-ID: <AL6Mb.54584$nG3.45585@twister.socal.rr.com>
Date: Sun, 11 Jan 2004 07:16:48 GMT
NNTP-Posting-Host: 24.24.221.87
X-Complaints-To: abuse@rr.com
X-Trace: twister.socal.rr.com 1073805408 24.24.221.87 (Sat, 10 Jan 2004 23:16:48 PST)
NNTP-Posting-Date: Sat, 10 Jan 2004 23:16:48 PST
Organization: RoadRunner - West

Wolfhard Buß wrote:
> MAPCLAN, a MAPCAR that doesn't cons nils, also known as MAPPEND, is
> probably what you are looking for.
> 
>  (defun mapclan (function list &rest lists)
>    (loop for args in (zip (cons list lists))
>          when (apply function args) collect it))
> 

Thanks for the feedback. My post is actually a dupe, thanks to the delay 
of a couple of days when I tried to post through google .

-Luke