small-doc-prepare ( -- quot: ( i -- doc ) )

Vocabulary

mongodb.benchmark

Inputs

None

Outputs

quot	a quotation with stack effect ( i -- doc )

Definition

USING: assocs kernel ;

IN: mongodb.benchmark

: small-doc-prepare ( -- quot: ( i -- doc ) )
    small-doc drop [ "x" DOC-SMALL clone [ set-at ] keep ] ;