Ast_convenience (ppx_deriving.Ppx_deriving.Ast

val mkloc : 'a -> Ppxlib.Location.t -> 'a Ppxlib.loc

val mknoloc : 'a -> 'a Ppxlib.loc

val unit : unit -> Ppxlib.expression

val punit : unit -> Ppxlib.pattern

val int : int -> Ppxlib.expression

val pint : int -> Ppxlib.pattern

val str : string -> Ppxlib.expression

val evar : string -> Ppxlib.expression

val pvar : string -> Ppxlib.pattern

val app : Ppxlib.expression -> Ppxlib.expression list -> Ppxlib.expression

val constr : string -> Ppxlib.expression list -> Ppxlib.expression

val pconstr : string -> Ppxlib.pattern list -> Ppxlib.pattern

val tconstr : string -> Ppxlib.core_type list -> Ppxlib.core_type

val record : (string * Ppxlib.expression) list -> Ppxlib.expression

val precord : 
  closed:Ppxlib.closed_flag ->
  (string * Ppxlib.pattern) list ->
  Ppxlib.pattern

val tuple : Ppxlib.expression list -> Ppxlib.expression

val ptuple : Ppxlib.pattern list -> Ppxlib.pattern

val has_attr : string -> Ppxlib.attributes -> bool

val find_attr : string -> Ppxlib.attributes -> Ppxlib.payload option

module Label : sig ... end