Clojure中defn报错‘First argument to defn must be a symbol’的原因及疑问

这个问题问到点子上了，刚好能帮你搞清楚Clojure里宏和运行期求值的核心区别，咱们一步步拆解：

一、你的写法报错的根本原因 #

defn不是普通函数，它是一个宏。宏的工作机制是：在代码编译阶段直接接收传入的s-表达式（代码形式），不会先对参数进行求值。

• 当你写标准写法(defn f [] 1)时，宏看到的第一个参数是字面量符号f，完全符合defn宏的要求（它明确规定第一个参数必须是一个符号）。
• 但你写(defn (symbol "f") [] 1)时，宏看到的第一个参数是列表(symbol "f")，而不是这个列表运行后得到的符号f。宏在编译期就会检查参数类型，发现不是符号，直接抛出First argument to defn must be a symbol的错误——它根本不会去运行(symbol "f")这个表达式。

二、那能不能动态命名函数？ #

当然可以！只是不能用defn直接实现，得用运行期的工具来操作，给你两种常见方式：

1. 使用intern函数（推荐） #

intern可以在指定命名空间里动态创建一个Var，并把函数绑定到这个Var上：

;; 在当前命名空间创建名为f的函数
(intern *ns* (symbol "f") (fn [] 1))

;; 调用验证
(f) ; => 1

这里*ns*代表当前命名空间，你也可以指定其他命名空间（比如'user）。这种方式直接在运行期操作命名空间，简洁高效。

2. 结合eval和def #

如果你想模拟defn的定义形式，可以用eval来动态执行生成的代码：

(eval `(def ~(symbol "f") (fn [] 1)))

;; 同样可以调用
(f) ; => 1

这里用了语法引号（）和反引号（~）：语法引号会把整个表达式当成模板，反引号会让(symbol "f")先求值成符号f，再替换到模板里，最后eval执行这段动态生成的def代码。不过要注意，eval`会触发编译，性能和安全性上要谨慎（你说没实际业务场景，玩玩完全没问题）。

三、补充：为什么defn不支持动态命名？ #

defn的设计目标是静态定义函数，它在编译期会做很多额外工作：比如校验参数列表的合法性、生成函数的元数据（比如文档字符串）、优化函数的调用逻辑等。如果允许动态生成的符号作为函数名，这些编译期的检查和优化就没法进行了，所以它强制要求第一个参数是字面量符号。

内容的提问来源于stack exchange，提问作者monojohnny