type 'a t
=
|
A of 'a ‑> Shexp_sexp.Std.Sexp.t
L of string * 'a ‑> Shexp_sexp.Std.Sexp.t
(** L for Labeled *)
O of string * 'a ‑> Shexp_sexp.Std.Sexp.t * 'a
(** O for Optional *)