let
iter_factories f =
Hashtbl
.iter (
fun
_ fac
->
f fac) factories