Module Bus.Read_only

type 'callback t = ('callbackCore_kernel__.Std_internal.read) bus
val sexp_of_t : ('callback -> Ppx_sexp_conv_lib.Sexp.t) -> 'callback t -> Ppx_sexp_conv_lib.Sexp.t
include Core_kernel__.Import.Invariant.S1 with type 'a t := 'a t
type 'a t
val invariant : 'a Base__.Invariant_intf.inv -> 'a t Base__.Invariant_intf.inv