aboutsummaryrefslogtreecommitdiff
path: root/pretyping/pattern.ml
diff options
context:
space:
mode:
Diffstat (limited to 'pretyping/pattern.ml')
-rw-r--r--pretyping/pattern.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/pretyping/pattern.ml b/pretyping/pattern.ml
index 1dfb8b2cd1..f6d61f4892 100644
--- a/pretyping/pattern.ml
+++ b/pretyping/pattern.ml
@@ -41,6 +41,7 @@ type constr_pattern =
| PCoFix of int * (Name.t array * constr_pattern array * constr_pattern array)
| PInt of Uint63.t
| PFloat of Float64.t
+ | PArray of constr_pattern array * constr_pattern * constr_pattern
(** Nota : in a [PCase], the array of branches might be shorter than
expected, denoting the use of a final "_ => _" branch *)