To (pa_ppx.Pa_deriving

module PM : sig ... end

type attrmod_t =

val to_yojson_fname : 'a -> string -> string

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

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

val sig_item_fun0 : 'a -> MLast.type_decl -> string * MLast.ctyp

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

val sig_items : 'a -> MLast.type_decl -> MLast.sig_item list

val str_item_funs : 
  Ctxt.t ->
  MLast.type_decl ->
  (MLast.patt * MLast.expr * 'a 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