module Pa_bench: sig
.. end
val libname : unit -> string
val drop_benches : [ `Deadcode | `No | `Remove ] Pervasives.ref
val maybe_drop : Camlp4.PreCast.Ast.loc ->
Camlp4.PreCast.Ast.expr -> Camlp4.PreCast.Ast.str_item
val descr : Camlp4.PreCast.Ast.loc ->
Camlp4.PreCast.Ast.expr * Camlp4.PreCast.Ast.expr * Camlp4.PreCast.Ast.expr *
Camlp4.PreCast.Ast.expr
val apply_to_descr_bench : string ->
Camlp4.PreCast.Ast.Loc.t ->
Camlp4.PreCast.Ast.expr option ->
string -> Camlp4.PreCast.Ast.expr -> Camlp4.PreCast.Ast.str_item