mirror of https://github.com/status-im/reagent.git
Use keyword as key in with-let
This commit is contained in:
parent
6ad55160eb
commit
69e39bf6f7
|
@ -17,7 +17,7 @@
|
||||||
(defmacro with-let [bindings & body]
|
(defmacro with-let [bindings & body]
|
||||||
(assert (vector? bindings))
|
(assert (vector? bindings))
|
||||||
(let [v (gensym "with-let")
|
(let [v (gensym "with-let")
|
||||||
k (str v)
|
k (keyword v)
|
||||||
init (gensym "init")
|
init (gensym "init")
|
||||||
bs (into [init `(zero? (alength ~v))]
|
bs (into [init `(zero? (alength ~v))]
|
||||||
(map-indexed (fn [i x]
|
(map-indexed (fn [i x]
|
||||||
|
|
Loading…
Reference in New Issue