aboutsummaryrefslogtreecommitdiff
path: root/kernel/safe_typing.ml
diff options
context:
space:
mode:
authorPierre-Marie Pédrot2019-12-18 16:52:10 +0100
committerPierre-Marie Pédrot2019-12-18 16:52:10 +0100
commitdfdfa9eeedebb0aec2cd72be9c1eee27ca9b2fab (patch)
treec6e4c772dae91a047c488f20fb3b03afd384300a /kernel/safe_typing.ml
parent6b9f6c365ec5b478e79f70cf2a1ae4faed809b74 (diff)
parent467d4f28802bf07bb0cdb748c78f0936219ceb8d (diff)
Merge PR #11027: Cleanup post #10647 (expose comind universe handling)
Reviewed-by: ppedrot
Diffstat (limited to 'kernel/safe_typing.ml')
-rw-r--r--kernel/safe_typing.ml1
1 files changed, 0 insertions, 1 deletions
diff --git a/kernel/safe_typing.ml b/kernel/safe_typing.ml
index 759feda9ab..d04f43f5bd 100644
--- a/kernel/safe_typing.ml
+++ b/kernel/safe_typing.ml
@@ -1015,7 +1015,6 @@ let close_section senv =
| `Inductive (ind, mib) ->
let info = cooking_info (Section.segment_of_inductive env0 ind sections0) in
let mie = Cooking.cook_inductive info mib in
- let mie = InferCumulativity.infer_inductive senv.env mie in
let _, senv = add_mind (MutInd.label ind) mie senv in
senv
in