aboutsummaryrefslogtreecommitdiff
path: root/vernac/search.ml
diff options
context:
space:
mode:
authorHugo Herbelin2018-10-09 20:47:46 +0200
committerHugo Herbelin2018-10-19 16:55:40 +0200
commit9b5ceabc9b62cdf9b806bb4abdff73642113e12e (patch)
tree06a671e2a3b7867a6e8302a64c159362234ac344 /vernac/search.ml
parent6a52d22067727da3d5b2128ea1ac67f8037138b1 (diff)
Deprecating Global.type_of_global_in_context.
Removing a few Global.env in the way.
Diffstat (limited to 'vernac/search.ml')
-rw-r--r--vernac/search.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/vernac/search.ml b/vernac/search.ml
index 04dcb7d565..23e53ce673 100644
--- a/vernac/search.ml
+++ b/vernac/search.ml
@@ -80,7 +80,7 @@ let iter_declarations (fn : GlobRef.t -> env -> constr -> unit) =
| "CONSTANT" ->
let cst = Global.constant_of_delta_kn kn in
let gr = ConstRef cst in
- let (typ, _) = Global.type_of_global_in_context (Global.env ()) gr in
+ let (typ, _) = Typeops.type_of_global_in_context (Global.env ()) gr in
fn gr env typ
| "INDUCTIVE" ->
let mind = Global.mind_of_delta_kn kn in