Handbook
Glossary
(insert) ( quot: ( i -- doc ) collection -- )
Vocabulary
mongodb
.
benchmark
Inputs
quot
a
quotation
with stack effect
( i -- doc )
collection
an
object
Outputs
None
Definition
USING:
accessors
combinators
kernel
math
mongodb.driver
namespaces
;
IN:
mongodb.benchmark
:
(insert)
( quot: ( i -- doc ) collection -- )
[
trial-size
]
2dip
[
]
curry
[
[
( i -- doc )
call-effect
]
curry
]
dip
[
dip
result
get
lasterror>>
[
save
]
[
save-unsafe
]
if
]
curry
compose
each-integer
;