aboutsummaryrefslogtreecommitdiff
path: root/interp
diff options
context:
space:
mode:
authorcoqbot2020-08-17 16:10:31 +0200
committerGitHub2020-08-17 16:10:31 +0200
commit55c66171b18f6aecf6e5ce4f5e06fccb85004df7 (patch)
treec7323c0c25ec9ca765f10a8b3e22b0c4404c097d /interp
parent700aaaacad67d5d5f47805d9aa817213c84cfc02 (diff)
parent0e96c241550c4a8abf65f3bb63fcd7cab3380e92 (diff)
Merge PR #12802: Document semantic restriction on patterns in Gallina match construct
Reviewed-by: Zimmi48 Ack-by: gares Ack-by: jfehrle
Diffstat (limited to 'interp')
-rw-r--r--interp/constrintern.ml3
1 files changed, 1 insertions, 2 deletions
diff --git a/interp/constrintern.ml b/interp/constrintern.ml
index 6d4ab8b4d6..1d3b1bbb24 100644
--- a/interp/constrintern.ml
+++ b/interp/constrintern.ml
@@ -1724,8 +1724,7 @@ let drop_notations_pattern looked_for genv =
the domains of lambdas in the encoding of match in constr.
This check is here and not in the parser because it would require
duplicating the levels of the [pattern] rule. *)
- CErrors.user_err ?loc ~hdr:"drop_notations_pattern"
- (Pp.strbrk "Casts are not supported in this pattern.")
+ CErrors.user_err ?loc (Pp.strbrk "Casts are not supported in this pattern.")
and in_pat_sc scopes x = in_pat false (x,snd scopes)
and in_not top loc scopes (subst,substlist as fullsubst) args = function
| NVar id ->