extend ALL to records (for walker reimplementation)

This commit is contained in:
nathanmarz 2017-06-01 01:27:24 -04:00
parent 550d486954
commit e8f15c4137

View file

@ -129,6 +129,13 @@
(all-transform [structure next-fn]
(non-transient-map-all-transform structure next-fn (empty structure)))
clojure.lang.IRecord
(all-transform [structure next-fn]
(reduce
(fn [res kv] (conj res (next-fn kv)))
structure
structure
))
#?(:clj clojure.lang.PersistentHashMap :cljs cljs.core/PersistentHashMap)
(all-transform [structure next-fn]