(VectorLiteIterator. arr i)
(deftype VectorLiteIterator [arr ^:mutable i] Object (hasNext [_] (< i (alength arr))) (next [_] (let [x (aget arr i)] (set! i (inc i)) x)))