aboutsummaryrefslogtreecommitdiff
path: root/kernel/term_typing.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/term_typing.ml')
-rw-r--r--kernel/term_typing.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/term_typing.ml b/kernel/term_typing.ml
index 291c409e9a..57c1710ff5 100644
--- a/kernel/term_typing.ml
+++ b/kernel/term_typing.ml
@@ -102,7 +102,7 @@ let build_constant_declaration env kn (body,typ,cst,op,boxed) =
(global_vars_set env (Declarations.force b))
(global_vars_set env typ)
in
- let tps = from_val (compile_constant_body env kn body op boxed) in
+ let tps = from_val (compile_constant_body env body op boxed) in
let hyps = keep_hyps env ids in
{ const_hyps = hyps;
const_body = body;