aboutsummaryrefslogtreecommitdiff
path: root/kernel/subtyping.ml
diff options
context:
space:
mode:
authorcoqbot-app[bot]2020-10-19 10:45:06 +0000
committerGitHub2020-10-19 10:45:06 +0000
commit33f6551fd030643d0accf50dd762bcede5dd4b8b (patch)
tree690c39bf35bc3bf460035f2ec0e55df50b859593 /kernel/subtyping.ml
parent5be9faac2dcf44b383e57f95b4fbd558b8bd24b8 (diff)
parent7320cd84f92793572550d1fe1a2181f40466fa81 (diff)
Merge PR #13151: Remove the compare_graph field from the conversion API.
Reviewed-by: SkySkimmer
Diffstat (limited to 'kernel/subtyping.ml')
-rw-r--r--kernel/subtyping.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/kernel/subtyping.ml b/kernel/subtyping.ml
index 28baa82666..76a1c190be 100644
--- a/kernel/subtyping.ml
+++ b/kernel/subtyping.ml
@@ -85,7 +85,7 @@ let make_labmap mp list =
let check_conv_error error why cst poly f env a1 a2 =
try
- let cst' = f env (Environ.universes env) a1 a2 in
+ let cst' = f env a1 a2 in
if poly then
if Constraint.is_empty cst' then cst
else error (IncompatiblePolymorphism (env, a1, a2))