From 1f78733204d5a1232d06c103057dc65dcb14a7ea Mon Sep 17 00:00:00 2001
From: herbelin
Date: Tue, 18 Sep 2001 13:06:18 +0000
Subject: Suppression du message d'erreur si une coercion mettant en jeu des
 locaux n'est pas déclarée locale (le discharge fonctionnera bien
 silencieusement et c'est compatible V6.3)

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1981 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 toplevel/class.ml | 5 -----
 1 file changed, 5 deletions(-)

diff --git a/toplevel/class.ml b/toplevel/class.ml
index 57afbb5e55..667e127061 100644
--- a/toplevel/class.ml
+++ b/toplevel/class.ml
@@ -296,11 +296,6 @@ let get_strength stre ref cls clt =
  *)
   let streunif = NeverDischarge in
   let stre' = stre_max4 stres stret stref streunif in
-  if (stre = NeverDischarge) & (stre' <> NeverDischarge)
-  then errorlabstrm "try_add_coercion" 
-    [< Printer.pr_global ref;
-       'sTR " must be declared as a local coercion"; 'fNL;
-       'sTR "because it involves local definition" >];
   stre_max (stre,stre')
 
 (* coercion identité *)
-- 
cgit v1.2.3