Cache.Table
type 'a t
val load : ?name:string -> dirtype:dirtype -> string -> 'a t
val get : 'a t -> string -> (unit -> 'a) -> 'a
val store : dirtype:dirtype -> 'a t -> unit