[cl-who-devel] Newbie confusion

[Vamsee Kanakala]

Hi,


I suspect this has got to do with not properly understanding what gensym
does, but I think this should work, but I'm only getting empty <li>
elements from the list-items function. Where am I going wrong?

(defun list-items ()
  (let ((=value= (gensym)))
    (loop for =value= to 15 collecting
	 `((:li (write-to-string ,=value=))))))

(defmacro show-errors ()
  `(with-html-output (*standard-output*)
     (:div :id "errorExplanation"
	   (:ul ,@(list-items)))))


Thanks,
Vamsee.