aboutsummaryrefslogtreecommitdiffhomepage
path: root/engine/termops.ml
diff options
context:
space:
mode:
authorGravatar Maxime Dénès <mail@maximedenes.fr>2018-05-16 00:06:51 +0200
committerGravatar Maxime Dénès <mail@maximedenes.fr>2018-05-28 15:28:24 +0200
commit4552729b88058946055dddde1533057e25bfc5a9 (patch)
tree38c4c1440c9aa03430b63da175663f96bcf668dd /engine/termops.ml
parentb053d98fb17d2f46878f49d7adf4839ae632c10b (diff)
Unify pre_env and env
We now have only two notions of environments in the kernel: env and safe_env.
Diffstat (limited to 'engine/termops.ml')
-rw-r--r--engine/termops.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/engine/termops.ml b/engine/termops.ml
index 053fcc3db..04fdad670 100644
--- a/engine/termops.ml
+++ b/engine/termops.ml
@@ -1374,7 +1374,7 @@ let smash_rel_context sign =
let fold_named_context_both_sides f l ~init = List.fold_right_and_left f l init
let mem_named_context_val id ctxt =
- try ignore(Environ.lookup_named_val id ctxt); true with Not_found -> false
+ try ignore(Environ.lookup_named_ctxt id ctxt); true with Not_found -> false
let map_rel_decl f = function
| RelDecl.LocalAssum (id, t) -> RelDecl.LocalAssum (id, f t)