@everyone who has ever wanted while loops in lisp

1 view
Skip to first unread message

dan brooks

unread,
Nov 5, 2008, 7:22:52 PM11/5/08
to ic...@googlegroups.com
(defmacro while (test &body b) `(loop (when (not ,test) (return)) ,@b))

Dan

Tim Menzies

unread,
Nov 5, 2008, 7:26:43 PM11/5/08
to ic...@googlegroups.com
:-)


On Wed, Nov 5, 2008 at 7:22 PM, dan brooks <alloh...@gmail.com> wrote:
(defmacro while (test &body b) `(loop (when (not ,test) (return)) ,@b))

Dan





--
timm, a/prof, csee, wvu, usa

Bill Vaughan  - "The tax collector must love poor people, he's creating so many of them."
Reply all
Reply to author
Forward
0 new messages