let put = Hashtbl.replace digests