1 2 3
type t = [ `Message_id of Snowflake.t ] [@@deriving sexp, yojson] val get_id : t -> Snowflake.t