type t = {name : string; |
doc : string option; |
}val t_fields_annots : string -> (string * string option) listval t_toplevel_annots : unit -> (string * string option) listval t_of_sexp : Ppx_sexp_conv_lib.Sexp.t -> tval sexp_of_t : t -> Ppx_sexp_conv_lib.Sexp.tval compare : t -> t -> intval equal : t -> t -> boolval of_annots :
name:string ->
( unit -> (Core_kernel.String.t * string option) list ) ->
t