Clojure中Map初始化快捷方式：多参函数返回Map能否优化？

好问题！先明确下你说的ES6里的操作大概是这种吧——比如接收多个参数，直接返回键名和参数名一致的对象，像这样：

// ES6示例：参数名自动作为对象键
const createUser = (name, age) => ({ name, age });
createUser("Bob", 28); // 返回 { name: "Bob", age: 28 }

Clojure确实没有这种开箱即用的语法糖，但有几种优雅的实现方式，比手动逐个写键值对要高效得多：

1. 自定义宏（最推荐的复用方案） #

Clojure的宏可以在编译期获取参数名，我们可以写一个宏来自动生成参数名对应键的Map。比如定义一个defn-map宏：

(defmacro defn-map [fn-name params & body]
  `(defn ~fn-name ~params
     ;; 将每个参数映射成键值对，再和函数体中的Map合并
     (merge {:~@(mapcat #(vector % %) params)}
            ~@body)))

使用起来就像普通defn一样，但会自动把参数转为Map的键：

;; 定义函数，额外添加:active字段
(defn-map createUser [name age] {:active true})

;; 调用函数
(createUser "Alice" 30) 
;; 返回 => {:name "Alice", :age 30, :active true}

这个方案的好处是一次定义宏后，所有需要类似功能的函数都能复用，代码非常简洁。

2. 使用zipmap（适合单个函数的快速实现） #

如果只是单个函数需要这个功能，用zipmap可以快速实现，不需要写宏：

(defn createUser [name age]
  ;; 把参数名（关键字）和参数值一一对应生成Map
  (zipmap [:name :age] [name age]))

(createUser "Charlie" 35)
;; 返回 => {:name "Charlie", :age 35}

zipmap会把第一个集合的元素作为键，第二个集合的元素作为值，一一配对生成Map。这种方式纯函数式，没有宏的编译期依赖，简单直接。

3. 不推荐的动态方案：locals #

还有一种用locals获取当前局部变量的方式，但不推荐在生产代码中使用——因为locals是动态获取运行时环境，性能差且行为不稳定：

(defn createUser [name age]
  (select-keys (locals) [:name :age]))

这种写法虽然短，但依赖Clojure的运行时细节，不是惯用的Clojure写法，尽量避免。

总结一下：如果需要多次复用这种逻辑，自定义宏是最优解；如果只是单个函数使用，zipmap足够简洁优雅。

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