module Cache_util:sig..end
typekey =[ `Hash of Digest.t | `String of string ]
`Hash dg: As digest of a string`String s: As string (to be digested)val hash_of_key : key -> stringval bucket_of_hash : int -> string -> intn, the number of buckets, and the
hash value (which must be a string of 16 bytes).