Browse files

* src/cljs/cljs/core.cljs: fix ci-reduce for IndexedSeq

  • Loading branch information...
David Nolen David Nolen
David Nolen authored and David Nolen committed May 1, 2012
1 parent 1940a49 commit fbb1df0606380308b088bd02022d764f3dc414aa
Showing with 2 additions and 2 deletions.
  1. +2 −2 src/cljs/cljs/core.cljs
@@ -433,11 +433,11 @@ reduces them without incurring seq initialization"
(-reduce [coll f]
(if (counted? a)
(ci-reduce a f (aget a i) (inc i))
- (ci-reduce coll f (aget a i) (inc i))))
+ (ci-reduce coll f (aget a i) 0)))
(-reduce [coll f start]
(if (counted? a)
(ci-reduce a f start i)
- (ci-reduce coll f start i)))
+ (ci-reduce coll f start 0)))
(-hash [coll] (hash-coll coll)))

0 comments on commit fbb1df0

Please sign in to comment.