   (data-arity [_]
     cnt)
 
+  (get-node [_ _]
+    nil)
+
+  (get-array [_]
+    arr)
+
   (inode-lookup [inode shift hash key not-found]
     (let [idx (hash-collision-node-find-index arr cnt key)]
       (cond (< idx 0)              not-found

(def lem (.-EMPTY PersistentHashMap))
(def cem (.-EMPTY cljs.core/PersistentHashMap))

(comment
  (let [times 100
        hm1 (loop [m lem i 0]
               (if (< i times)
                 (recur (assoc m (str "key" i) i) (inc i))

  (data-arity [_]
    (bit-count datamap))

  (get-node [_ i]
    (aget arr (- (alength arr) 1 i)))

  (get-array [_]
    arr)

  (inode-lookup [inode shift hash key not-found]
    (let [bit (bitpos hash shift)]
      (cond
