小编Tur*_*abs的帖子

我试图通过使用dolist宏来总结一个列表.但是,我不能这样做.它总是返回列表的最后一个元素.提前致谢.

(defun sumlist2 (l)
  ;;this function computes total of a list by using dolist macro
  (let ((summ 0))
    (dolist (obj l)
      (setf summ (+ obj)))
    summ))