KeyValue.MemoryKV
type value = string
type store = ( string, string ) Stdlib.Hashtbl.t
val get : store:store -> string -> ( value, [> `Msg of string ] ) Lwt_result.t
val set : ?expiry:int -> store:store -> string -> value -> unit Lwt.t