module Unregister: sig .. end
sig
end
type t
val noop : t
t
val create : (unit -> unit) -> t
(unit -> unit) -> t
val unregister : t -> unit
t -> unit