Module `Patterns.Simple`

type view = [

| `Any
| `Constant of Typedtree.constant
| `Tuple of (string option * Typedtree.pattern) list
| `Unboxed_tuple of (string option * Typedtree.pattern * Jkind.sort) list
| `Construct of Longident.t Asttypes.loc * Types.constructor_description * Typedtree.pattern list
| `Variant of Asttypes.label * Typedtree.pattern option * Types.row_desc Stdlib.ref
| `Record of (Longident.t Asttypes.loc * Types.label_description * Typedtree.pattern) list * Asttypes.closed_flag
| `Record_unboxed_product of (Longident.t Asttypes.loc * Types.unboxed_label_description * Typedtree.pattern) list * Asttypes.closed_flag
| `Array of Types.mutability * Jkind.sort * Typedtree.pattern list
| `Lazy of Typedtree.pattern

]

type pattern = Patterns.Simple.view Typedtree.pattern_data

val omega : [> Patterns.Simple.view ] Typedtree.pattern_data