Compat (docs.findlib-0.compiler-libs.Printpat.Compat)

val pretty_pat : Format.formatter -> 'k Typedtree.general_pattern -> unit

val pretty_line : Format.formatter -> 'k Typedtree.general_pattern list -> unit

val pretty_matrix : 
  Format.formatter ->
  'k Typedtree.general_pattern list list ->
  unit