diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-08 06:49:13 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-04-08 06:49:13 +0000 |
| commit | 5d3d6667984c6a6bed163844679385b91ed807d8 (patch) | |
| tree | 0bd146c5189863d5579772c6bbaeeca6003fc44b /gcc/ada/errout.ads | |
| parent | f17fd3d988f031a40da04751224ecfe8d2f276fc (diff) | |
| download | gcc-5d3d6667984c6a6bed163844679385b91ed807d8.tar.gz | |
2008-04-08 Robert Dewar <dewar@adacore.com>
* errout.ads: Update comments for new handling of info: messages
* erroutc.adb (Matches): New procedure
(Warning_Specifically_Suppressed): Modified to handle multiple * chars
(Is_Style_Or_Info_Msg): New name for Is_Style_Msg, now set for
info messages as well as style messages.
* erroutc.ads: Remove unneeded fields from Specific_Warning_Entry
* sem_elab.adb (Supply_Bodies): Create actual bodies for stubbed
subprograms.
(Check_A_Call): Special "info: " warnings now have ? in the text
(Elab_Warning): Use info message in static case
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@134024 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/errout.ads')
| -rw-r--r-- | gcc/ada/errout.ads | 25 |
1 files changed, 16 insertions, 9 deletions
diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads index b9b0616fe1c..83b50953010 100644 --- a/gcc/ada/errout.ads +++ b/gcc/ada/errout.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2007, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2008, 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- -- @@ -275,14 +275,21 @@ package Errout is -- Insertion character ? (Question: warning message) -- The character ? appearing anywhere in a message makes the message -- warning instead of a normal error message, and the text of the - -- message will be preceded by "Warning:" instead of "Error:" in the - -- normal case. The handling of warnings if further controlled by the - -- Warning_Mode option (-w switch), see package Opt for further - -- details, and also by the current setting from pragma Warnings. This - -- pragma applies only to warnings issued from the semantic phase (not - -- the parser), but currently all relevant warnings are posted by the - -- semantic phase anyway. Messages starting with (style) are also - -- treated as warning messages. + -- message will be preceded by "warning:" in the normal case. The + -- handling of warnings if further controlled by the Warning_Mode + -- option (-w switch), see package Opt for further details, and also by + -- the current setting from pragma Warnings. This pragma applies only + -- to warnings issued from the semantic phase (not the parser), but + -- currently all relevant warnings are posted by the semantic phase + -- anyway. Messages starting with (style) are also treated as warning + -- messages. + -- + -- Note: when a warning message is output, the text of the message is + -- preceded by "warning: " in the normal case. An exception to this + -- rule occurs when the text of the message starts with "info: " in + -- which case this string is not prepended. This allows callers to + -- label certain warnings as informational messages, rather than as + -- warning messages requiring some action. -- -- Note: the presence of ? is ignored in continuation messages (i.e. -- messages starting with the \ insertion character). The warning |