diff options
| author | Jim Fehrle | 2020-08-07 20:54:55 -0700 |
|---|---|---|
| committer | Jim Fehrle | 2020-08-15 22:54:44 -0700 |
| commit | 0e96c241550c4a8abf65f3bb63fcd7cab3380e92 (patch) | |
| tree | de77e762756b319d049e843edb2255c1b47c4b5c /interp/constrintern.ml | |
| parent | 7427e7c5fa5312e7625ebf5243978691fdb04f92 (diff) | |
Document semantic restriction on patterns
Diffstat (limited to 'interp/constrintern.ml')
| -rw-r--r-- | interp/constrintern.ml | 3 |
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 -> |