Исправление Jini, 15.11.16 09:54 (текущая версия) :
Зачем там вообще defparameter?
(defmacro sum (n) (loop for i from 1 to n sum i))
Исходная версия Jini, 15.11.16 09:53:
или, в данном случае,
(defmacro sum (n) (/ (* n (1+ n)) 2))