aboutsummaryrefslogtreecommitdiffhomepage
path: root/interp/constrintern.ml
diff options
context:
space:
mode:
authorGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2018-07-18 09:57:17 +0200
committerGravatar Enrico Tassi <Enrico.Tassi@inria.fr>2018-07-18 09:57:17 +0200
commite5e3725fab9daa810a4c8a383886f1c5dc980e85 (patch)
treee52a1840f911fe3db1a0ebec855b4984793e81af /interp/constrintern.ml
parent8023d0de14e707d716cb4be9f583a714b10da9bd (diff)
parentb63abc6b93f458bc7a2a16b45b8941a34c25cb03 (diff)
Merge PR #8068: [build] Build Coq and plugins with `-strict-sequence`
Diffstat (limited to 'interp/constrintern.ml')
-rw-r--r--interp/constrintern.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/constrintern.ml b/interp/constrintern.ml
index 18d6c1a5b..9a4f2177f 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 =