Permalink
Browse files

[fix] stdlib: Fixed order of documents in Mongo log.

  • Loading branch information...
1 parent a9a94ba commit 02e4ae619b2fe653534e99d4540a694f86a50f77 @nrs135 nrs135 committed Nov 28, 2011
Showing with 1 addition and 1 deletion.
  1. +1 −1 libbase/mongo.ml
View
@@ -57,7 +57,7 @@ let docmap b pos len num =
else
let size = geti32 b pos in
if len - pos < size
- then idxs
+ then List.rev idxs
else aux (i+1) (pos+size) ((pos,size)::idxs)
in
aux 0 pos []

0 comments on commit 02e4ae6

Please sign in to comment.