Module Benchmark_accumulator.Entry

type ('param, 'a) parameterised_spec = {
  1. arg_name : string;
  2. params : (string * 'param) list;
    (*

    The first coordinate is some string representation of the second coordinate.

    *)
  3. thunk : 'param -> unit -> 'a;
}
type test_spec =
  1. | Regular_thunk : ([ `init ] -> unit -> 'a) -> test_spec
  2. | Parameterised_thunk : ('param, 'a) parameterised_spec -> test_spec
type t = private {
  1. unique_id : int;
  2. code : string;
  3. type_conv_path : string;
  4. name : string;
  5. filename : string;
  6. line : int;
  7. startpos : int;
  8. endpos : int;
  9. test_spec : test_spec;
  10. bench_module_name : string option;
}
val with_test_spec : t -> test_spec -> t
val compare : t -> t -> int
val get_module_name_opt : t -> string option