read-timestamp ( -- timestamp )

Vocabulary

bson.private

Inputs

None

Outputs

timestamp

an object

Definition

USING: bson.constants endian io kernel sequences ;

IN: bson.private

: read-timestamp ( -- timestamp )
    8 read [ 4 head signed-le> ] [ 4 tail signed-le> ] bi
    <mongo-timestamp> ;