Skip to content

Commit

Permalink
it should
Browse files Browse the repository at this point in the history
  • Loading branch information
mdirolf committed Nov 16, 2008
1 parent b8db328 commit c0aa823
Showing 1 changed file with 1 addition and 2 deletions.
3 changes: 1 addition & 2 deletions bson.sml
Expand Up @@ -148,8 +148,7 @@ struct
val document' = dedup document
val document'' = MD.toList document'
val objectData = List.concat(List.map elementToBSON document'')
(* overhead for the size bytes and eoo.
* TODO should this include the eoo byte or not? *)
(* overhead for the size bytes and eoo *)
val overhead = 5
val size = intToWord8List (length objectData + overhead)
in
Expand Down

0 comments on commit c0aa823

Please sign in to comment.