Ast_utils (ppx_optcomp.Ppx_optcomp.Ast

val get_expr : loc:Ppxlib.Location.t -> Ppxlib.payload -> Ppxlib.expression

val assert_no_arguments : loc:Ppxlib.Location.t -> Ppxlib.payload -> unit

val make_apply_fun : 
  loc:Ppxlib.location ->
  string ->
  Parsetree.expression ->
  Parsetree.expression

val get_ident : loc:Ppxlib.Location.t -> Ppxlib.payload -> Ppxlib.longident_loc

val get_var : 
  loc:Ppxlib.Location.t ->
  Ppxlib.payload ->
  Base.String.t Astlib.Location.loc

val get_var_expr : 
  loc:Ppxlib.Location.t ->
  Ppxlib.payload ->
  Base.String.t Astlib.Location.loc * Ppxlib.expression option

val get_string : loc:Ppxlib.Location.t -> Ppxlib.payload -> string