let
(ht : (string, transform record)
Hashtbl
.t) =
Hashtbl
.create 10