Pa_deriving.PI
type t = {
name : string;
alternates : string list;
options : string list;
alg_attributes : string list;
expr_extensions : string list;
ctyp_extensions : string list;
expr : Pa_ppx_base.Pa_passthru.Ctxt.t -> MLast.expr -> MLast.expr;
ctyp : Pa_ppx_base.Pa_passthru.Ctxt.t -> MLast.ctyp -> MLast.ctyp;
str_item : string ->
Pa_ppx_base.Pa_passthru.Ctxt.t ->
MLast.str_item ->
MLast.str_item;
sig_item : string ->
Pa_ppx_base.Pa_passthru.Ctxt.t ->
MLast.sig_item ->
MLast.sig_item;
default_options : (string * MLast.expr) list;
}
val attributes : t -> string list
val is_medium_form_attribute : t -> MLast.attribute -> bool
val is_long_form_attribute : t -> MLast.attribute -> bool
val medium_form_attributes : t -> string list
val long_form_attributes : t -> string list