sig
  type t
  val create : name:string -> (unit -> unit) -> Bench.Test.t
  val create_indexed :
    name:string ->
    args:int list ->
    (int -> (unit -> unit) Core.Std.Staged.t) -> Bench.Test.t
end