decl.c (gnat_to_gnu_entity): In the case of a constrained subtype of a discriminated...
authorEric Botcazou <ebotcazou@adacore.com>
Thu, 12 Jun 2008 13:19:06 +0000 (13:19 +0000)
committerEric Botcazou <ebotcazou@gcc.gnu.org>
Thu, 12 Jun 2008 13:19:06 +0000 (13:19 +0000)
commit1dd4a3e6378a4f20d7c6ce9ef588e65cbe0e38e7
tree2db270491bd07d4352f95eee6ffa4b3a27eca273
parentfcd2a5d4d6600edbd2937830c60b5e5696ab1593
decl.c (gnat_to_gnu_entity): In the case of a constrained subtype of a discriminated type...

* decl.c (gnat_to_gnu_entity) <E_Record_Subtype>: In the case of a
constrained subtype of a discriminated type, discard the fields that
are beyond its limits according to its size.

From-SVN: r136707
gcc/ada/ChangeLog
gcc/ada/decl.c
gcc/testsuite/ChangeLog
gcc/testsuite/gnat.dg/discr9.adb [new file with mode: 0644]
gcc/testsuite/gnat.dg/discr9.ads [new file with mode: 0644]