2014-01-25 25 views

回答

3

宏:

(defmacro some-hash-thing [& vals] 
    (zipmap (map keyword vals) vals)) 

而且在使用中:

(let [a 4, b 5] 
    (some-hash-thing b a)) 
;; => {:a 4, :b 5} 
+0

我建议从@noisesmith中窃取名字回答:'as-keymap'和'names'好得多。 – Shepmaster

+2

语法引用无引号是多余的 - 它们相互抵消。 –

+0

感谢您指出,@ A.Webb。显然,我没有尽我所能地从我所有的REPL实验中清理它。我编辑过,以反映这一点。 – Shepmaster