OCaml library for JSONfeed parsing and creation
1(** Hub endpoints for real-time notifications. *)
2
3type t = {
4 type_ : string;
5 url : string;
6}
7
8let create ~type_ ~url () =
9 { type_; url }
10
11let type_ t = t.type_
12let url t = t.url
13
14let equal a b =
15 a.type_ = b.type_ && a.url = b.url
16
17let pp ppf t =
18 Format.fprintf ppf "%s: %s" t.type_ t.url