diff options
Diffstat (limited to 'kernel/declareops.ml')
-rw-r--r-- | kernel/declareops.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/kernel/declareops.ml b/kernel/declareops.ml index 28f7e69cd..5caf052ac 100644 --- a/kernel/declareops.ml +++ b/kernel/declareops.ml @@ -16,6 +16,7 @@ open Context.Rel.Declaration let safe_flags = { check_guarded = true; + check_universes = true; } (** {6 Arities } *) @@ -261,6 +262,7 @@ let subst_mind_body sub mib = mind_universes = mib.mind_universes; mind_private = mib.mind_private; mind_checked_positive = mib.mind_checked_positive; + mind_unsafe_universes = mib.mind_unsafe_universes; } let inductive_instance mib = |