Module `Patterns.Non_empty_row`

type 'a t = 'a * Ocaml_typing.Typedtree.pattern list

val of_initial : 
  Ocaml_typing.Typedtree.pattern list ->
  Ocaml_typing.Typedtree.pattern Ocaml_typing.Patterns.Non_empty_row.t

'assert false' on empty rows

val map_first : 
  ('a -> 'b) ->
  'a Ocaml_typing.Patterns.Non_empty_row.t ->
  'b Ocaml_typing.Patterns.Non_empty_row.t

Module Patterns.Non_empty_row