1001コメント412KB

CommonLisp初心者スレ

■ このスレッドは過去ログ倉庫に格納されています

0312(define (´∀｀) 'ﾏﾀｰﾘ)

NGNG

(defun func (lst)
(let ((y 0))
(dolist (x lst y)
(setq y (+ y x)))))

(defun func (lst)
(apply #'+ lst))

■ このスレッドは過去ログ倉庫に格納されています