diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-03-02 11:07:34 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-03-02 11:07:34 +0000 |
commit | e8600b0de788b70622a01fdc40344ed7ce92db33 (patch) | |
tree | 3d413ee4bbd4502e0880da234c42c2e34eb53a76 /gcc/ada/elists.adb | |
parent | c1bccde67b74999e40a6d7a641430537444cf5c5 (diff) | |
download | gcc-e8600b0de788b70622a01fdc40344ed7ce92db33.tar.gz |
2015-03-02 Hristian Kirtchev <kirtchev@adacore.com>
* sem_prag.adb (Ensure_Aggregate_Form):
Ensure that the name denoted by the Chars of a pragma argument
association has the proper Sloc when converted into an aggregate.
2015-03-02 Bob Duff <duff@adacore.com>
* sem_ch6.adb (Check_Private_Overriding): Capture
Incomplete_Or_Partial_View in a constant. This is cleaner and
more efficient.
2015-03-02 Gary Dismukes <dismukes@adacore.com>
* einfo.ads, exp_unst.ads: Minor reformatting.
2015-03-02 Ed Schonberg <schonberg@adacore.com>
* a-strsea.adb (Find_Token): Ensure that the range of iteration
does not perform any improper character access. This prevents
erroneous access in the unusual case of an empty string target
and a From parameter less than Source'First.
2015-03-02 Robert Dewar <dewar@adacore.com>
* elists.adb (List_Length): Fix incorrect result.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@221111 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/elists.adb')
-rw-r--r-- | gcc/ada/elists.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/elists.adb b/gcc/ada/elists.adb index 4d332644b74..5b1f88cdd74 100644 --- a/gcc/ada/elists.adb +++ b/gcc/ada/elists.adb @@ -302,6 +302,7 @@ package body Elists is if No (Elmt) then return N; else + N := N + 1; Next_Elmt (Elmt); end if; end loop; |