* decl.c (gnat_to_gnu_entity) <E_Record_Subtype>: In the case of a
commit94108d47d1f9c0ac41f79c17054b1639dfcd71d6
authorebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 12 Jun 2008 13:19:06 +0000 (12 13:19 +0000)
committerebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 12 Jun 2008 13:19:06 +0000 (12 13:19 +0000)
tree2db270491bd07d4352f95eee6ffa4b3a27eca273
parente8dfa624ebe010ea22b6b3514aca0d696845bba3
* 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.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@136707 138bc75d-0d04-0410-961f-82ee72b054a4
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]