                    init)]
         (if (reduced? init)
           @init
-          (let [init (if-not (nbil? (.-right node))
+          (let [init (if-not (nil? (.-right node))
                        (tree-map-kv-reduce (.-right node) f init)
                        init)]
             (if (reduced? init)

(defn aclone
  "Returns a javascript array, cloned from the passed in array"
  [array-like]
  (js* "(~{array-like}).slice()"))

(defn array
  "Creates a new javascript array.


(defn make-array
  ([size]
     (js/Array. size))
  ([type size]
     (make-array size)))

