如何在elisp中返回函数

Question

这与此问题有关：elisp functions as parameters and as return value

(defun avg-damp (n)
   '(lambda(x) (/ n 2.0)))

无论

(funcall (avg-damp 6) 10)

或

((avg-damp 6) 10)

他们分别给出了Symbol's value as variable is void: n和eval: Invalid function: (avg-damp 6)的错误。

Answer 1

第一种形式不起作用的原因是n动态绑定，而不是词法：

(defun avg-damp (n)
  (lexical-let ((n n))
    (lambda(x) (/ x n))))
(funcall (avg-damp 3) 12)
==> 4

第二种形式不起作用的原因是Emacs Lisp与Common Lisp一样，a "lisp-2", not a "lisp-1"