Don't understand (when = (...))
Posted: Sat Nov 26, 2011 7:26 pm
I was playing around with DO in Lispworks and did a macro expansion of a simple example.
This all makes sense to me except for the (when = (...)). Shouldn't there be a test form where the "=" resides? I did the same expansion in Clozure CL and it is similar, but uses an (unless = (...)).
Code: Select all
(BLOCK NIL
(LET ((I 0))
(DECLARE (IGNORABLE I))
(DECLARE)
(TAGBODY
#:G727 (WHEN = (RETURN-FROM NIL (PROGN I 10)))
(PRINT "hello")
(SETQ I (1+ I))
(GO #:G727))))