diff options
| author | Emilio Jesus Gallego Arias | 2019-01-08 01:51:09 +0100 |
|---|---|---|
| committer | Emilio Jesus Gallego Arias | 2019-01-08 01:51:09 +0100 |
| commit | d6fe12b3ce8299a161c59ff8ed0657531af70329 (patch) | |
| tree | fc82d7c1cae50a2a1a8a901f579709de0f9c2b02 /interp/constrexpr_ops.ml | |
| parent | cd0b6e930d8753f68f5ed84ddcf00be09cd38990 (diff) | |
| parent | 9d0c0a903aa8ed6514dbc363ff4571d7cad70687 (diff) | |
Merge PR #9292: Fixing some wrong scopes of variables in the interpretation of the "in" clause of a "match"
Diffstat (limited to 'interp/constrexpr_ops.ml')
| -rw-r--r-- | interp/constrexpr_ops.ml | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/interp/constrexpr_ops.ml b/interp/constrexpr_ops.ml index 7bc5d090b4..95a0039b0a 100644 --- a/interp/constrexpr_ops.ml +++ b/interp/constrexpr_ops.ml @@ -293,9 +293,6 @@ let ids_of_pattern_list = (List.fold_left (cases_pattern_fold_names Id.Set.add)) Id.Set.empty -let ids_of_cases_indtype p = - cases_pattern_fold_names Id.Set.add Id.Set.empty p - let ids_of_cases_tomatch tms = List.fold_right (fun (_, ona, indnal) l -> |