type t = [ | | `CR | Leaves a CR, so that features cannot be released. | 
| | `Warning_for_collector_testing | Only for ppx_expect testing; do not use. | 
 ]val comment_prefix : t -> stringval message_when_expectation_contains_backtrace : t -> stringMessage to print when an expectation contains a backtrace