Pa_ppx_testutils.Testutil2
val car : 'a list -> 'a
val cdr : 'a list -> 'a list
val sep_last : 'a list -> 'a * 'a list
val invoked_with : ?flag:string -> string -> bool
val exn_wrap_result : ?msg:(string Fmt.t * string) -> ('a -> 'b) -> 'a -> 'b