All operations that touch disk are passed through Throttle.enqueue
Throttle.enqueue
val enqueue : (unit ‑> 'a Async.Deferred.t) ‑> 'a Async.Deferred.t