let
declare_dyn_module m f =
(loaded_modules := m :: !loaded_modules;
Queue
.add (m, f) callbacks)