   (inode-without [inode shift hash key]
     (let [idx  (mask hash shift)
           node (aget arr idx)]
-      (if (coercive-not= nil node)
+      (if-not (nil? node)
         (let [n (.inode-without node (+ shift 5) hash key)]
           (cond
             (identical? n node)

             (if (== level 5)
               tail-node
               (let [child (pv-aget ret subidx)]
                 (if (coercive-not= child nil)
                   (tv-push-tail tv (- level 5) child tail-node)
                   (new-path (.. tv -root -edit) (- level 5) tail-node)))))
    ret))

        (pv-aset ret subidx tailnode)
        ret)
      (let [child (pv-aget parent subidx)]
        (if-not (nil? child)
          (let [node-to-insert (push-tail pv (- level 5) child tailnode)]
            (pv-aset ret subidx node-to-insert)
            ret)
