aboutsummaryrefslogtreecommitdiff
path: root/engine/termops.ml
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2018-10-15 16:11:58 +0200
committerPierre-Marie Pédrot2018-10-15 16:11:58 +0200
commitda4c6c4022625b113b7df4a61c93ec351a6d194b (patch)
treedc72a6cd47abc99dcd87382ee95385471ac2588e /engine/termops.ml
parentfca9ec68937e047d3895d05e57de462387737796 (diff)
parent8a3fa648109ab4fae20a424fd1342cb26a123d58 (diff)
Merge PR #8689: A few useless accesses to the global environment in pretyping and engine
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 efe1525c9a..1244074d50 100644
--- a/engine/termops.ml
+++ b/engine/termops.ml
@@ -963,7 +963,7 @@ let collect_vars sigma c =
let vars_of_global_reference env gr =
let c, _ = Global.constr_of_global_in_context env gr in
- vars_of_global (Global.env ()) c
+ vars_of_global env c
(* Tests whether [m] is a subterm of [t]:
[m] is appropriately lifted through abstractions of [t] *)