diff options
| author | coqbot-app[bot] | 2020-11-20 16:10:14 +0000 |
|---|---|---|
| committer | GitHub | 2020-11-20 16:10:14 +0000 |
| commit | 6479926c576a1ab6aaa2f0524407f4383fcc1838 (patch) | |
| tree | bc61e6ce93f47a1ad3f97fb3f5bbdb58b482a6f8 /interp/notation_ops.mli | |
| parent | 614675fa5337cca0621ae7a65d4fd47a6ad8f788 (diff) | |
| parent | d13abaf2b7789aecccd607e014025b6c8b9ae094 (diff) | |
Merge PR #12965: Fixes #9569: in notations with binders, prevent collisions between variable and non-qualified global references
Reviewed-by: ejgallego
Ack-by: maximedenes
Ack-by: gares
Diffstat (limited to 'interp/notation_ops.mli')
| -rw-r--r-- | interp/notation_ops.mli | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/interp/notation_ops.mli b/interp/notation_ops.mli index 3182ea96d7..9d451a5bb9 100644 --- a/interp/notation_ops.mli +++ b/interp/notation_ops.mli @@ -68,10 +68,11 @@ exception No_match val print_parentheses : bool ref -val match_notation_constr : bool -> 'a glob_constr_g -> interpretation -> - ('a glob_constr_g * extended_subscopes) list * ('a glob_constr_g list * extended_subscopes) list * - ('a cases_pattern_disjunction_g * extended_subscopes) list * - ('a extended_glob_local_binder_g list * extended_subscopes) list +val match_notation_constr : print_univ:bool -> 'a glob_constr_g -> vars:Id.Set.t -> interpretation -> + ((Id.Set.t * 'a glob_constr_g) * extended_subscopes) list * + ((Id.Set.t * 'a glob_constr_g list) * extended_subscopes) list * + ((Id.Set.t * 'a cases_pattern_disjunction_g) * extended_subscopes) list * + ((Id.Set.t * 'a extended_glob_local_binder_g list) * extended_subscopes) list val match_notation_constr_cases_pattern : 'a cases_pattern_g -> interpretation -> |