Functor Misc.MakeHooks

module MakeHooks: 
functor (M : sig
type t 
end-> HookSig with type t = M.t
Parameters:
M : sig type t end

type t 
val add_hook : string -> (Misc.hook_info -> t -> t) -> unit
val apply_hooks : Misc.hook_info -> t -> t