diff options
| author |  Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2015-10-11 14:36:29 +0200 |
|---|---|---|
| committer | Hugo Herbelin <Hugo.Herbelin@inria.fr> | 2015-10-11 15:21:33 +0200 |
| commit | e9995f6e9f9523d4738d9ee494703b6f96bf995d (patch) | |
| tree | ce5297379247c6af9e6c16ba45b5b7e479b96d3c /pretyping/glob_ops.mli | |
| parent | ae5305a4837cce3c7fd61b92ce8110ac66ec2750 (diff) | |
Fixing untimely unexpected warning "Collision between bound variables" (#4317).
Collecting the bound variables is now done on the glob_constr, before
interpretation, so that only variables given explicitly by the user
are used for binding bound variables.
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 e514fd529..25746323f 100644 --- a/pretyping/glob_ops.mli +++ b/pretyping/glob_ops.mli @@ -38,6 +38,7 @@ val fold_glob_constr : ('a -> glob_constr -> 'a) -> 'a -> glob_constr -> 'a val iter_glob_constr : (glob_constr -> unit) -> glob_constr -> unit 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 (** [map_pattern_binders f m c] applies [f] to all the binding names |