collection-name ( -- collection )

Vocabulary

mongodb.benchmark

Inputs

None

Outputs

collection

an object

Definition

USING: accessors formatting kernel namespaces ;

IN: mongodb.benchmark

: collection-name ( -- collection )
    collection "benchmark" get*
    result get doc>> result get index>> bchar "%s-%s-%s" sprintf
    [ [ result get ] dip >>collection drop ] keep ;