diff options
| author | Gaëtan Gilbert | 2019-03-12 09:38:12 +0100 |
|---|---|---|
| committer | Gaëtan Gilbert | 2019-03-18 13:02:23 +0100 |
| commit | c44ef565b7e66026439c40b14bed30a18daef762 (patch) | |
| tree | 2e96943625cc2b25d985e986201085aa0f25002f /kernel/safe_typing.ml | |
| parent | 9ac5483132b42e845a0708491843693b70893eef (diff) | |
Remove Term_typing.translate_mind indirection
Diffstat (limited to 'kernel/safe_typing.ml')
| -rw-r--r-- | kernel/safe_typing.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/safe_typing.ml b/kernel/safe_typing.ml index edb1d0a02e..673f025c75 100644 --- a/kernel/safe_typing.ml +++ b/kernel/safe_typing.ml @@ -842,7 +842,7 @@ let check_mind mie lab = let add_mind l mie senv = let () = check_mind mie l in let kn = MutInd.make2 senv.modpath l in - let mib = Term_typing.translate_mind senv.env kn mie in + let mib = Indtypes.check_inductive senv.env kn mie in let mib = match mib.mind_hyps with [] -> Declareops.hcons_mind mib | _ -> mib in |