[Ada] Fix inheritance of representation items defined as aspects
authorThomas Quinot <quinot@adacore.com>
Wed, 26 Sep 2018 09:20:05 +0000 (09:20 +0000)
committerPierre-Marie de Rodat <pmderodat@gcc.gnu.org>
Wed, 26 Sep 2018 09:20:05 +0000 (09:20 +0000)
commitdef15641da84fb82adfeb946c6d714683148e6e3
tree03afa6c40302957d55a36ab4791afc3234c1e4ef
parent0ebf09ed046391377af708ab2471403d3affdddd
[Ada] Fix inheritance of representation items defined as aspects

When a representation item is defined by a pragma or attribute
definition clause, the entity it applies to is that of the Name of the
representation item. But when it is defined by an aspect definition, the
entity is directly denoted by the Entity attribute of the represenation
item. The circuitry that inherits representation items for derived types
or subtypes must account for these two possible cases.

2018-09-26  Thomas Quinot  <quinot@adacore.com>

gcc/ada/

* sem_ch13.adb (Inherit_Aspects_At_Freeze_Point): For a
representation item that is an N_Aspect_Definition, retrieve the
entity it applies to using the Entity attribute.

gcc/testsuite/

* gnat.dg/sso13.adb: New testcase.

From-SVN: r264636
gcc/ada/ChangeLog
gcc/ada/sem_ch13.adb
gcc/testsuite/ChangeLog
gcc/testsuite/gnat.dg/sso13.adb [new file with mode: 0644]