### Internal Utils

We provide NO stability guarantee for this module. Use at your own risks.

`type ('b, 'c) printer = {`

1. `info : 'a. ('a, 'b, 'c, unit) Stdlib.format4 -> 'a;`
2. `fail : 'a. ('a, 'b, 'c, unit) Stdlib.format4 -> 'a;`
3. `err : 'a. ('a, 'b, 'c, unit) Stdlib.format4 -> 'a;`

`}`
`val print_std : (Stdlib.out_channel, unit) printer`
`val callback : colors:bool -> verbose:bool -> print_res:bool -> print:('a, 'b) printer -> string -> 'c QCheck2.Test.cell -> 'c QCheck2.TestResult.t -> unit`
`type cli_args = {`

1. `cli_verbose : bool;`
2. `cli_long_tests : bool;`
3. `cli_print_list : bool;`
4. `cli_rand : Stdlib.Random.State.t;`
5. `cli_slow_test : int;`
6. `cli_colors : bool;`
7. `cli_debug_shrink : Stdlib.out_channel option;`
8. `cli_debug_shrink_list : string list;`

`}`
`val parse_cli : full_options:bool -> string array -> cli_args`