Add mirror-map macro (commented inder uxbox.util.data ns).

This commit is contained in:
Andrey Antukh
2016-10-24 22:12:35 +02:00
parent 075c508d63
commit 71c6adab58

View File

@@ -143,3 +143,9 @@
acc))
[]
(partition 2 params))))
;; (defmacro mirror-map [& fields]
;; (let [keys# (map #(keyword (name %)) fields)
;; vals# fields]
;; (apply hash-map (interleave keys# vals#))))