Key_cache_sync.Disk_storable
type (!'k, !'v) t = ( 'k, 'v ) Key_cache.Disk_storable(Core_kernel.Or_error).t = {
to_string : 'k -> string;
read : 'k -> path:string -> 'v Core_kernel.Or_error.t;
write : 'k -> 'v -> string -> unit Core_kernel.Or_error.t;
}
val of_binable : ( 'k -> string ) -> (module Core_kernel.Binable.S with type t = 'v) -> ( 'k, 'v ) t
val simple : ( 'k -> string ) -> ( 'k -> path:string -> 'v Core_kernel.Or_error.t ) -> ( 'k -> 'v -> string -> unit Core_kernel.Or_error.t ) -> ( 'k, 'v ) t