with-result ( options quot -- )

Vocabulary

mongodb.benchmark

Inputs

options	an object
quot	an object

Outputs

None

Definition

USING: combinators namespaces ;

IN: mongodb.benchmark

: with-result ( options quot -- )
    '[ <result> _ ( options -- time ) call-effect print-result ]
    with-scope ;