To (pa_ppx.Pa_deriving

type attrmod_t =

| Nobuiltin

module PM : sig ... end

val to_sexp_fname : 'a -> string -> string

val to_expression : 
  Pa_ppx_base.Pa_passthru.Ctxt.t ->
  ?coercion:MLast.ctyp ->
  msg:'a ->
  PM.param_t list ->
  Pa_ppx_base.Pp_MLast.ctyp ->
  MLast.expr

val fmt_to_top : 
  Pa_ppx_base.Pa_passthru.Ctxt.t ->
  coercion:MLast.ctyp ->
  msg:'a ->
  PM.param_t list ->
  Pa_ppx_base.Pp_MLast.ctyp ->
  MLast.expr

val str_item_top_funs : Ctxt.t -> MLast.type_decl -> (string * MLast.expr) list

val sig_item_top_funs : 'a -> MLast.type_decl -> (string * MLast.ctyp) list

val str_item_funs : 
  Ctxt.t ->
  MLast.type_decl ->
  (MLast.patt
   * MLast.expr
   * ((MLast.loc * string) Ploc.vala * MLast.payload) Ploc.vala list Ploc.vala)
    list

val extend_sig_items : 'a -> MLast.sig_item -> MLast.sig_item list

val extend_str_items : 
  Pa_ppx_base.Pa_passthru.Ctxt.t ->
  MLast.str_item ->
  MLast.str_item list