diff options
| author | Hugo Herbelin | 2020-11-25 19:15:11 +0100 |
|---|---|---|
| committer | Hugo Herbelin | 2020-12-11 17:09:34 +0100 |
| commit | f7004c56875ad0495a25cd1ff617b0f109b3b332 (patch) | |
| tree | c10d3f0fc9047e9239517cb84f770c3b4d43a411 /pretyping | |
| parent | 5a77078718c18b05e7ffb1366d6dd9e439ecfc91 (diff) | |
Removing non relevant argument binding_kind of GLocalDef.
Diffstat (limited to 'pretyping')
| -rw-r--r-- | pretyping/glob_term.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/glob_term.ml b/pretyping/glob_term.ml index a957bc0fcd..9f93e5e6c1 100644 --- a/pretyping/glob_term.ml +++ b/pretyping/glob_term.ml @@ -137,7 +137,7 @@ type cases_pattern_disjunction = [ `any ] cases_pattern_disjunction_g type 'a extended_glob_local_binder_r = | GLocalAssum of Name.t * binding_kind * 'a glob_constr_g - | GLocalDef of Name.t * binding_kind * 'a glob_constr_g * 'a glob_constr_g option + | GLocalDef of Name.t * 'a glob_constr_g * 'a glob_constr_g option | GLocalPattern of ('a cases_pattern_disjunction_g * Id.t list) * Id.t * binding_kind * 'a glob_constr_g and 'a extended_glob_local_binder_g = ('a extended_glob_local_binder_r, 'a) DAst.t |