【发布时间】:2016-04-11 15:09:35
【问题描述】:
*** - SYSTEM::%EXPAND-FORM: (< J N) should be a lambda expression
这是发生的代码:
(defun SORTALIST (x) (setq i 0) (setq j (+ i 1))
(cond ((< i n)) (cond ((< j n))
(cond ((> (car (nth (i) (x)))(car (nth (j) (x)))))
(EXCHANGE (nth (i)(x))(nth (j)(x)))
(setq j (+ j 1)) (SORTALIST (x)))
(t (setq j (+ j 1)) (SORTALIST (x))))
(t (setq i (+ i 1)) (setq j (+ i 1)) (SORTALIST (x)))) (x))
我改变了一个小时左右,我不知道我可以解决哪里。 我该如何解决这个问题?
【问题讨论】:
标签: lambda common-lisp