let iter ~f t = Hashtbl.iter t ~f:(fun ~key ~data:_ -> f key)