Start rewrite BSON.scm