Module Benchmark_accumulator.Entry
type 'a indexed_spec
=
{
arg_name : string;
arg_values : int list;
thunk : int -> unit -> 'a;
}
type test_spec
=
|
Regular_thunk : ([ `init ] -> unit -> 'a) -> test_spec
|
Indexed_thunk : 'a indexed_spec -> test_spec
type t
= private
{
unique_id : int;
code : string;
type_conv_path : string;
name : string;
filename : string;
line : int;
startpos : int;
endpos : int;
test_spec : test_spec;
bench_module_name : string option;
}