diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-10-26 10:24:05 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-10-26 10:24:05 +0000 |
commit | 44d567c8dc10de1abf5118ebf0f16dba1dc25fbe (patch) | |
tree | 3a2e33ee6564818115b96ca0643b1f32272c7793 /gcc/ada/sem_ch12.adb | |
parent | 9698c123453fa47fe280c6cc29cda36b59316a05 (diff) | |
download | gcc-44d567c8dc10de1abf5118ebf0f16dba1dc25fbe.tar.gz |
2015-10-26 Ed Schonberg <schonberg@adacore.com>
* sem_ch12.adb (Analyze_Formal_Package_Declaration): Code clean up.
* sem_ch13.adb (Check_Inherited_Indexing): New inner procedure
of Check_Indexing_Functions, to verify that a derived type with an
Indexing aspect is not inheriting such an aspect from an ancestor.
(Check_Indexing_Functions): Call Check_Inherited_Indexing within
an instance.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@229316 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_ch12.adb')
-rw-r--r-- | gcc/ada/sem_ch12.adb | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb index 6891c64b225..7d52d2e44ae 100644 --- a/gcc/ada/sem_ch12.adb +++ b/gcc/ada/sem_ch12.adb @@ -2587,7 +2587,6 @@ package body Sem_Ch12 is or else Nkind (First (Generic_Associations (N))) = N_Others_Choice then Associations := False; - Set_Box_Present (N); end if; -- If there are no generic associations, the generic parameters appear |