 (defn- push-tail [pv level parent tailnode]
   (let [ret (aclone parent)
         subidx (bit-and (bit-shift-right (dec (.-cnt pv)) level) 0x01f)]
-    (if (= 5 level)
+    (if (== 5 level)
       (do
         (aset ret subidx tailnode)
         ret)

  (-pop [coll]
    (cond
     (zero? cnt) (throw (js/Error. "Can't pop empty vector"))
     (= 1 cnt) (-with-meta cljs.core.PersistentVector/EMPTY meta)
     (< 1 (- cnt (tail-off coll)))
      (PersistentVector. meta (dec cnt) shift root (aclone tail))
      :else (let [new-tail (array-for coll (- cnt 2))

           (aset new-tail (bit-and k 0x01f) v)
           (PersistentVector. meta cnt shift root new-tail))
         (PersistentVector. meta cnt shift (do-assoc coll shift root k v) tail))
       (== k cnt) (-conj coll v)
       :else (throw (js/Error. (str "Index " k " out of bounds  [0," cnt "]")))))

  IVector
