sig type t val create : ?name:string -> ?size:int -> (unit -> unit) -> Bench.Test.t val name : Bench.Test.t -> string option val size : Bench.Test.t -> int end