sig
  type t = Typedtree.structure * Typedtree.module_coercion
  val add_hook : string -> (Misc.hook_info -> t -> t) -> unit
  val apply_hooks : Misc.hook_info -> t -> t
end