diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2016-04-19 19:13:23 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2016-04-19 19:40:13 +0200 |
| commit | 75a48bfc6b91f1e5095d9cdfbcc0ae2bf8cf16ec (patch) | |
| tree | 3954479b911b7681255764be0bcb13d72f52e8bd /pretyping/glob_ops.mli | |
| parent | b038ff00e3d1873bed580c13df1b18ce0510abb2 (diff) | |
Fixing #4677 (collision of a global variable and of a local variable
while eta-expanding a notation) + a more serious variant of it
(alpha-conversion incorrect wrt eta-expansion).
Diffstat (limited to 'pretyping/glob_ops.mli')
| -rw-r--r-- | pretyping/glob_ops.mli | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/pretyping/glob_ops.mli b/pretyping/glob_ops.mli index 45444234a..e0a2de032 100644 --- a/pretyping/glob_ops.mli +++ b/pretyping/glob_ops.mli @@ -40,6 +40,7 @@ val occur_glob_constr : Id.t -> glob_constr -> bool val free_glob_vars : glob_constr -> Id.t list val bound_glob_vars : glob_constr -> Id.Set.t val loc_of_glob_constr : glob_constr -> Loc.t +val glob_visible_short_qualid : glob_constr -> Id.t list (** [map_pattern_binders f m c] applies [f] to all the binding names in a pattern-matching expression ({!Glob_term.GCases}) represented |