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; |
}
val get_indexed_arg_name : t ‑> string option
val get_module_name_opt : t ‑> string option