From d63320ceb1c56710f5e953742dd5d6cf43aacbdf Mon Sep 17 00:00:00 2001 From: ppedrot Date: Wed, 8 May 2013 19:55:23 +0000 Subject: Uniformizing the [if_warn] flag used for warning printing and put it into the standard logger instead. git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16491 85f007b7-540e-0410-9357-904b9bb8a0f7 --- library/nametab.ml | 2 -- 1 file changed, 2 deletions(-) (limited to 'library/nametab.ml') diff --git a/library/nametab.ml b/library/nametab.ml index 12cad7f55..9f2bede75 100644 --- a/library/nametab.ml +++ b/library/nametab.ml @@ -120,7 +120,6 @@ struct | Absolute (n,_) -> (* This is an absolute name, we must keep it otherwise it may become unaccessible forever *) - Flags.if_warn msg_warning (str ("Trying to mask the absolute name \"" ^ U.to_string n ^ "\"!")); tree.path @@ -160,7 +159,6 @@ let rec push_exactly uname o level tree = function | Absolute (n,_) -> (* This is an absolute name, we must keep it otherwise it may become unaccessible forever *) - Flags.if_warn msg_warning (str ("Trying to mask the absolute name \"" ^ U.to_string n ^ "\"!")); tree.path -- cgit v1.2.3