aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/errout.ads
diff options
context:
space:
mode:
authorEd Schonberg <schonberg@adacore.com>2005-06-16 10:36:35 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2005-06-16 10:36:35 +0200
commit2aab5fd53b1e58ff46df944161645943fb1bbe5c (patch)
tree8b74efa2407316fb5cb2dac7b126f205bbdba4a1 /gcc/ada/errout.ads
parentedd63e9baccac484fcbeed6b082941a159c30244 (diff)
downloadgcc-2aab5fd53b1e58ff46df944161645943fb1bbe5c.zip
gcc-2aab5fd53b1e58ff46df944161645943fb1bbe5c.tar.gz
gcc-2aab5fd53b1e58ff46df944161645943fb1bbe5c.tar.bz2
errout.ads, errout.adb (Error_Msg_NW): Only emit warning on user code...
2005-06-14 Ed Schonberg <schonberg@adacore.com> Robert Dewar <dewar@adacore.com> * errout.ads, errout.adb (Error_Msg_NW): Only emit warning on user code, not on the bodies of predefined operations, to cut down on spurious noise. From-SVN: r101030
Diffstat (limited to 'gcc/ada/errout.ads')
-rw-r--r--gcc/ada/errout.ads4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads
index f3ffa2d..bac2e7e 100644
--- a/gcc/ada/errout.ads
+++ b/gcc/ada/errout.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992-2004 Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2005 Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -574,7 +574,7 @@ package Errout is
-- This routine is used for posting a message conditionally. The message
-- is posted (with the same effect as Error_Msg_N (Msg, N) if and only
-- if Eflag is True and if the node N is within the main extended source
- -- unit. Typically this is a warning mode flag.
+ -- unit and comes from source. Typically this is a warning mode flag.
procedure Change_Error_Text (Error_Id : Error_Msg_Id; New_Msg : String);
-- The error message text of the message identified by Id is replaced by