decl.c (gnat_to_gnu_entity): For a derived untagged type that renames discriminants...
authorEric Botcazou <ebotcazou@adacore.com>
Wed, 5 Nov 2014 19:03:26 +0000 (19:03 +0000)
committerEric Botcazou <ebotcazou@gcc.gnu.org>
Wed, 5 Nov 2014 19:03:26 +0000 (19:03 +0000)
commite028b0bbca86c369c145a410cf06a65d729c91d6
tree689a11b5b68ff99c2a799cbf10bcec80a263ec09
parente84314ddc5146971cc963fe0d8cd3bbbd32ed64c
decl.c (gnat_to_gnu_entity): For a derived untagged type that renames discriminants...

* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: For a
derived untagged type that renames discriminants, be prepared for
a type derived from a private discriminated type when changing the
type of the stored discriminants.

From-SVN: r217153
gcc/ada/ChangeLog
gcc/ada/gcc-interface/decl.c
gcc/testsuite/ChangeLog
gcc/testsuite/gnat.dg/specs/private2.ads [new file with mode: 0644]
gcc/testsuite/gnat.dg/specs/private2_pkg.ads [new file with mode: 0644]