Case.InvalidSyntax
type 'M t = {
invalid_prefix_case : 'M option;
invalid_infix_colon : 'M option;
invalid_suffix_semicolon : 'M option;
}
val pp : (Format.formatter -> 'M -> unit) -> Format.formatter -> 'M t -> unit
val show : (Format.formatter -> 'M -> unit) -> 'M t -> string