你能帮我解决一下我的代码,我不明白为什么它没有返回我的wireList,它只是返回NIL
(defun table-wires-position(inputTable inputPosition)
(let ((wireList () ))
(dolist (x (table-wires inputTable) wireList)
(if (or (equal-position-p (wire-OriginCoin x) inputPosition)
(equal-position-p (wire-destinCoin x) inputPosition))
(cons x wireList)))))
Run Code Online (Sandbox Code Playgroud)