aboutsummaryrefslogtreecommitdiff
path: root/kernel
diff options
context:
space:
mode:
Diffstat (limited to 'kernel')
-rw-r--r--kernel/term.ml2
-rw-r--r--kernel/term.mli2
2 files changed, 2 insertions, 2 deletions
diff --git a/kernel/term.ml b/kernel/term.ml
index ad4bd2bda2..45cd2fb0e0 100644
--- a/kernel/term.ml
+++ b/kernel/term.ml
@@ -24,7 +24,7 @@ type metavariable = int
(* This defines the strategy to use for verifiying a Cast *)
(* This defines Cases annotations *)
-type case_style = LetStyle | IfStyle | MatchStyle | RegularStyle
+type case_style = LetStyle | IfStyle | LetPatternStyle | MatchStyle | RegularStyle
type case_printing =
{ ind_nargs : int; (* number of real args of the inductive type *)
style : case_style }
diff --git a/kernel/term.mli b/kernel/term.mli
index f71207c5e1..2c6e7f0b48 100644
--- a/kernel/term.mli
+++ b/kernel/term.mli
@@ -40,7 +40,7 @@ type existential_key = int
type metavariable = int
(*s Case annotation *)
-type case_style = LetStyle | IfStyle | MatchStyle | RegularStyle
+type case_style = LetStyle | IfStyle | LetPatternStyle | MatchStyle | RegularStyle
type case_printing =
{ ind_nargs : int; (* number of real args of the inductive type *)
style : case_style }