scheme - 在 Common Lisp 中定义函数 Scheme 风格，没有 defun

Question

在 Scheme 中，您可以定义如下函数

(define f (lambda (x) ...))

特别是，你可以做这样的事情

(define f (g))

其中 g 是一些返回函数的函数。是否可以在 Common Lisp 中做同样的事情，即将函数符号与给定的匿名函数相关联？

Answer 1

没关系，我刚刚在 Paul Graham 的《ANSI Common Lisp 》一书中找到了答案（第二次查看后；第 99 页）：

(setf (symbol-function 'f) (lambda (x) (* x x)))

达到（对于大多数意图和目的）与

(defun f (x) (* x x))