aboutsummaryrefslogtreecommitdiff
path: root/kernel/mod_typing.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/mod_typing.ml')
-rw-r--r--kernel/mod_typing.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/mod_typing.ml b/kernel/mod_typing.ml
index a96bc52fce..a3639ef988 100644
--- a/kernel/mod_typing.ml
+++ b/kernel/mod_typing.ml
@@ -145,7 +145,7 @@ and translate_entry_list env msid is_definition sig_e =
let kn = make_kn mp empty_dirpath l in
match e with
| SPEconst ce ->
- let cb = translate_constant env ce in
+ let cb = translate_constant env kn ce in
begin match cb.const_hyps with
| (_::_) -> error_local_context (Some l)
| [] ->