File tree Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Expand file tree Collapse file tree 1 file changed +3
-3
lines changed Original file line number Diff line number Diff line change @@ -12414,7 +12414,7 @@ reduces them without incurring seq initialization"
1241412414 (when (pos? (alength keys))
1241512415 (prim-seq
1241612416 (.map (.sort keys obj-map-compare-keys)
12417- #(unchecked-get strobj %)) 0 )))
12417+ #(MapEntry. % ( unchecked-get strobj %))) )))
1241812418
1241912419 ICounted
1242012420 (-count [coll] (alength keys))
@@ -12558,11 +12558,11 @@ reduces them without incurring seq initialization"
1255812558 (loop [i 0 ]
1255912559 (if (< i cnt)
1256012560 (let [bckt (unchecked-get hashobj (aget hashes i))
12561- len (alength bkt )]
12561+ len (alength bckt )]
1256212562 (loop [j 0 ]
1256312563 (when (< j len)
1256412564 (do
12565- (.push arr (MapEntry. (aget bkt j) (aget bkt (inc j)) nil ))
12565+ (.push arr (MapEntry. (aget bckt j) (aget bckt (inc j)) nil ))
1256612566 (recur (+ j 2 )))))
1256712567 (recur (inc i)))
1256812568 (prim-seq arr))))))
You can’t perform that action at this time.
0 commit comments