diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-08-01 13:26:17 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-08-01 13:26:17 +0000 |
| commit | 7e246b24501096f768a72aa6d6f159cf1a0e8e63 (patch) | |
| tree | de670a27c04cef0d1bd19abfe5073ab8db9ccbfb /gcc/ada/atree.ads | |
| parent | ec0d407609bc0a519d7133a8d73ec05c0b2647ec (diff) | |
| download | gcc-7e246b24501096f768a72aa6d6f159cf1a0e8e63.tar.gz | |
2014-08-01 Ed Schonberg <schonberg@adacore.com>
* sem_ch5.adb (Analyze_Loop_Parameter_Specification): a)
An attribute_reference to Loop_Entry denotes an iterator
specification: its prefix is an object, as is the case for 'Old.
b) If the domain of iteration is an expression whose type has
the Iterable aspect defined, this is an iterator specification.
2014-08-01 Robert Dewar <dewar@adacore.com>
* gnatcmd.adb: Minor reformatting.
2014-08-01 Robert Dewar <dewar@adacore.com>
* atree.ads (Info_Messages): New counter.
* err_vars.ads: Minor comment update.
* errout.adb (Delete_Warning_And_Continuations): Deal
with new Info_Messages counter.
(Error_Msg_Internal): ditto.
(Delete_Warning): ditto.
(Initialize): ditto.
(Write_Error_Summary): ditto.
(Output_Messages): ditto.
(To_Be_Removed): ditto.
* erroutc.adb (Delete_Msg): Deal with Info_Messages counter.
(Compilation_Errors): ditto.
* errutil.adb (Error_Msg): Deal with Info_Messages counter.
(Finalize): ditto.
(Initialize): ditto.
* sem_prag.adb (Analyze_Pragma): Minor comment addition.
* gnat_ugn.texi: Document that -gnatwe does not affect info
messages.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@213457 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/atree.ads')
| -rw-r--r-- | gcc/ada/atree.ads | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/atree.ads b/gcc/ada/atree.ads index 38491d2b8ea..37b276e9cdb 100644 --- a/gcc/ada/atree.ads +++ b/gcc/ada/atree.ads @@ -313,7 +313,12 @@ package Atree is Warnings_Detected : Nat := 0; -- Number of warnings detected. Initialized to zero at the start of - -- compilation. Initialized for -gnatVa use, see comment above. + -- compilation. Initialized for -gnatVa use, see comment above. This + -- count includes the count of style and info messages. + + Info_Messages : Nat := 0; + -- Number of info messages generated. Info messages are neved treated as + -- errors (whether from use of the pragma, or the compiler switch -gnatwe). Warnings_Treated_As_Errors : Nat := 0; -- Number of warnings changed into errors as a result of matching a pattern |