Make copying of watches in ratom a little faster

2015-10-09 14:41:03 +02:00 · 2015-10-09 14:41:03 +02:00 · d30ef3aedb
parent 88d961563a
commit d30ef3aedb
1 changed files with 2 additions and 1 deletions
--- a/src/reagent/ratom.cljs
+++ b/src/reagent/ratom.cljs
@ -74,7 +74,8 @@
  (let [w (.-watchesArr this)
        a (if (nil? w)
            ;; Copy watches to array for speed
-            (->> this .-watches seq flatten into-array
+            (->> (.-watches this)
+                 (reduce-kv #(doto %1 (.push %2) (.push %3)) #js[])
                 (set! (.-watchesArr this)))
            w)]
    (let [len (alength a)]