[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: clarification of my previous ONCE-ONLY bug



(defmacro pairp (x)
   (once-only (x)
      `(and ,x (listp ,x))))

Then, in an mexp loop,

(pairp (car x)) =>

((lambda ()
    (and G0471 (listp G0471)))
 )