aboutsummaryrefslogtreecommitdiffhomepage
path: root/kernel/environ.ml
diff options
context:
space:
mode:
Diffstat (limited to 'kernel/environ.ml')
-rw-r--r--kernel/environ.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/environ.ml b/kernel/environ.ml
index 7759efb67..7a41e62c4 100644
--- a/kernel/environ.ml
+++ b/kernel/environ.ml
@@ -197,7 +197,7 @@ let add_mind kn mib env =
(* Universe constraints *)
let add_constraints c env =
- if c == empty_constraint then
+ if is_empty_constraint c then
env
else
let s = env.env_stratification in