一个奇怪的 Elisp 问题：纯函数两次返回值不一致？

[cireu]

避免修改 quote object 的结构

setcar, nreverse, sort, nconc delq 等属于 Destructive Operations，它们会修改参数的结构。注意避免给它们传入 quote object，比如 '(1 2 3)，尤其是在函数中。比如： (defun foo () (nreverse '(1 2 3))) ;; => foo (symbol-function 'foo) ;; => (lambda nil (nreverse '(1 2 3))) (foo) ;; => (3 2 1) (symbol-function 'foo) ;; => (lambda nil (nreverse '(1))) (foo) ;; => (1) Backquote 也可能会有问题 (defun foo () (nreverse `(1 ,2 3))) (symbol-function 'foo) ;; => (lambda nil (nreverse (cons 1 (cons 2 '(3))))) 正确的做法是确保每个元素都被执行过： (defun foo () …

这个主题正好回复了你的问题