clojure - 从 Clojure 记录返回普通 map

Question

我有一个记录:

(defrecord Point [x y])
(def p (Point. 1 2))

现在我只想从记录中提取 map 。这些方法可以完成工作。这些是好方法吗？有更好的方法吗？

(into {} (concat p))
(into {} (map identity p))
(apply hash-map (apply concat p))

我希望可能有一种更简洁的方法，也许内置于记录的概念中。

Answer 1

记录就是 map

(defrecord Thing [a b])

(def t1 (Thing. 1 2))
(instance? clojure.lang.IPersistentMap t1) ;=> true

所以，一般情况下没有必要将它们强制转换为 APersistentMap类型。但是，如果需要，您可以使用 into :

(into {} t1) ;=> {:a 1, :b 2}

如果要遍历任意数据结构，包括嵌套记录，进行此转换，请使用 walk

(def t2 (Thing. 3 4))
(def t3 (Thing. t1 t2))
(def coll (list t1 [t2 {:foo t3}]))

(clojure.walk/postwalk #(if (record? %) (into {} %) %) coll)
;=> ({:a 1, :b 2} [{:a 3, :b 4} {:foo {:a {:a 1, :b 2}, :b {:a 3, :b 4}}}])