checker deals with polymorphic constants and module aliases

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@10892 85f007b7-540e-0410-9357-904b9bb8a0f7

1 files changed, 2 insertions, 1 deletions

diff --git a/checker/term.ml b/checker/term.ml
index 9e4249396..45568a59a 100644
--- a/checker/term.ml
+++ b/checker/term.ml
@@ -24,7 +24,8 @@ 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 }