summaryrefslogtreecommitdiff
path: root/gcc/ada/sem_ch12.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2015-10-26 10:24:05 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2015-10-26 10:24:05 +0000
commit44d567c8dc10de1abf5118ebf0f16dba1dc25fbe (patch)
tree3a2e33ee6564818115b96ca0643b1f32272c7793 /gcc/ada/sem_ch12.adb
parent9698c123453fa47fe280c6cc29cda36b59316a05 (diff)
downloadgcc-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.adb1
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