let
put_all db kvs =
Deferred
.
List
.iter kvs ~f:(
fun
(k, v)
->
put db k v)