From ...
Path: archiver1.google.com!newsfeed.google.com!newsfeed.stanford.edu!news.tele.dk!small.news.tele.dk!134.222.94.5!npeer.kpnqwest.net!nreader1.kpnqwest.net.POSTED!not-for-mail
Newsgroups: comp.lang.lisp
Subject: Re: I like WHEN/UNLESS Was: Promoting CL Was: What I want from my Common   Lisp vendor and the Common Lisp community
References: <3208404998010473@naggum.net> <87itf1a2fh.fsf_-_@piracy.red-bean.com> <99fb3972.0109021504.bba92d0@posting.google.com> <3208475381413624@naggum.net> <MPG.15fca7683180ccba989705@news.dnai.com> <3208511830109687@naggum.net> <MPG.15fd2f7aaf808fc8989707@news.dnai.com> <87r8tow5ej.fsf@orion.bln.pmsf.de> <MPG.15fd8c7e2f4c12f298970b@news.dnai.com> <871ylnx1pw.fsf@orion.bln.pmsf.de> <MPG.15fdcc0ddc1825c598970d@news.dnai.com> <Df6l7.32821$aZ.8664688@typhoon.tampabay.rr.com> <9n33uu$rl3$0@216.39.145.192> <MPG.15fec26834416ffc9896b2@news.dnai.com> <87lmjun4eo.fsf@nkapi.internal> <m3y9nueis2.fsf@localhost.localdomain>
Mail-Copies-To: never
From: Erik Naggum <erik@naggum.net>
Message-ID: <3208694796835930@naggum.net>
Organization: Naggum Software, Oslo, Norway
Lines: 10
User-Agent: Gnus/5.0808 (Gnus v5.8.8) Emacs/20.7
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Wed, 05 Sep 2001 16:06:38 GMT
X-Complaints-To: newsmaster@Norway.EU.net
X-Trace: nreader1.kpnqwest.net 999705998 193.71.66.49 (Wed, 05 Sep 2001 18:06:38 MET DST)
NNTP-Posting-Date: Wed, 05 Sep 2001 18:06:38 MET DST
Xref: archiver1.google.com comp.lang.lisp:15668

* Lieven Marchand <mal@wyrd.be>
> One difference is that if* gives you implicit PROGN's.

(defmacro then (&body body)
  `(progn ,@body))

(defmacro else (&body body)
  `(progn ,@body))

///