From 9ae48c340c7bf1dd9d3bfb85550726facde2be85 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Tue, 12 Mar 2002 16:08:52 +0000
Subject: Propagation du pb de conversion dans clenv_unify

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2526 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 proofs/clenv.ml | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/proofs/clenv.ml b/proofs/clenv.ml
index a38e639eb2..67de8df987 100644
--- a/proofs/clenv.ml
+++ b/proofs/clenv.ml
@@ -823,11 +823,11 @@ let clenv_unify allow_K cv_pb ty1 ty2 clenv =
 	   clenv_unify2 allow_K cv_pb ty1 ty2 clenv
          with ex when catchable_exception ex -> 
            try 
-	     clenv_typed_unify CONV ty1 ty2 clenv
+	     clenv_typed_unify cv_pb ty1 ty2 clenv
            with ex when catchable_exception ex -> 
              error "Cannot solve a second-order unification problem")
 
-     | _ -> clenv_unify_0 CONV ty1 ty2 clenv
+     | _ -> clenv_unify_0 cv_pb ty1 ty2 clenv
 
 
 (* [clenv_bchain mv clenv' clenv]
-- 
cgit v1.2.3