Bus.Subscriber
type 'callback t
val sexp_of_t : ('callback -> Ppx_sexp_conv_lib.Sexp.t) -> 'callback t -> Ppx_sexp_conv_lib.Sexp.t