Lisp рекурсия возвращает NIL

Question

Скажите, что у меня есть предопределенная функция 'sum' в другом месте.

Я хочу суммировать два списка после того, как я (setq a '(4 3 4)) и (setq b '(6 10 9))

И я делаю (recurse a b).

Однако, я продолжаю получать 'nil' в качестве возвращаемого значения. Что я делаю не так с этой рекурсией?

Трассировка сейчас не помогает.

(defun recurse (x y)
    (cond
         ( (null x) nil) )
         (t   (sum (car x) (car y) ) (recurse (cdr x) (cdr y)) )

    )
)

Answer 1

Вам нужно подвести итоги;в противном случае они выбрасываются.

(defun recurse (x y)
  (cond
    ((null x) nil)
    (t (cons (sum (car x) (car y))
             (recurse (cdr x) (cdr y))))))