From db69efd2d7764b1845ec2683db7542f0b8e5b3ee Mon Sep 17 00:00:00 2001
From: filliatr
Date: Wed, 4 Jul 2001 09:45:41 +0000
Subject: message Ambiguous paths seulement si verbose

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1824 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 pretyping/classops.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pretyping/classops.ml b/pretyping/classops.ml
index 4cd71d09d1..76925e23e7 100755
--- a/pretyping/classops.ml
+++ b/pretyping/classops.ml
@@ -309,7 +309,7 @@ let add_coercion_in_graph (ic,source,target) =
 	 end)
       old_inheritance_graph 
   end;
-  if (!ambig_paths <> []) & is_mes_ambig() then 
+  if (!ambig_paths <> []) && is_verbose () && is_mes_ambig() then 
     pPNL (message_ambig !ambig_paths)
 
 let cache_coercion (_,((coe,xf),cls,clt)) =
-- 
cgit v1.2.3