diff options
| author | Enrico Tassi | 2018-07-18 09:57:17 +0200 |
|---|---|---|
| committer | Enrico Tassi | 2018-07-18 09:57:17 +0200 |
| commit | e5e3725fab9daa810a4c8a383886f1c5dc980e85 (patch) | |
| tree | e52a1840f911fe3db1a0ebec855b4984793e81af /interp | |
| parent | 8023d0de14e707d716cb4be9f583a714b10da9bd (diff) | |
| parent | b63abc6b93f458bc7a2a16b45b8941a34c25cb03 (diff) | |
Merge PR #8068: [build] Build Coq and plugins with `-strict-sequence`
Diffstat (limited to 'interp')
| -rw-r--r-- | interp/constrintern.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/constrintern.ml b/interp/constrintern.ml index 18d6c1a5b7..9a4f2177f6 100644 --- a/interp/constrintern.ml +++ b/interp/constrintern.ml @@ -552,7 +552,7 @@ let find_fresh_name renaming (terms,termlists,binders,binderlists) avoid id = let is_var store pat = match DAst.get pat with - | PatVar na -> store na; true + | PatVar na -> ignore(store na); true | _ -> false let out_var pat = |