From 780dd584632c362a0cd01149e23766b62037c971 Mon Sep 17 00:00:00 2001 From: Claudio Sacerdoti Coen Date: Tue, 2 Jan 2007 19:03:33 +0000 Subject: [PATCH] Same fix of the previous commit, but in a different case. --- components/cic_unification/cicUnification.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/components/cic_unification/cicUnification.ml b/components/cic_unification/cicUnification.ml index 91d10242d..a7a3a1674 100644 --- a/components/cic_unification/cicUnification.ml +++ b/components/cic_unification/cicUnification.ml @@ -645,7 +645,7 @@ assert false CoercGraph.look_for_coercion' metasenv subst context m car1 with - | CoercGraph.SomeCoercion [metasenv,last,coerced] + | CoercGraph.SomeCoercion ((metasenv,last,coerced)::_) -> last, fo_unif_subst test_equality_only subst context -- 2.39.2