r148125 - in /trunk/gcc: ada/ChangeLog ada/gcc-...

[ebotcazou@gcc.gnu.org]

Author: ebotcazou
Date: Wed Jun  3 10:52:40 2009
New Revision: 148125

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=148125
Log:
	* gcc-interface/decl.c (gnat_to_gnu_entity) <E_Record_Type>: When
	adjusting the discriminant nodes in an extension, use the full view
	of the parent subtype if it is of a private kind.

Added:
    trunk/gcc/testsuite/gnat.dg/specs/root-level_1-level_2.ads
    trunk/gcc/testsuite/gnat.dg/specs/root-level_1.ads
    trunk/gcc/testsuite/gnat.dg/specs/root-level_2.ads
    trunk/gcc/testsuite/gnat.dg/specs/root.ads
Modified:
    trunk/gcc/ada/ChangeLog
    trunk/gcc/ada/gcc-interface/decl.c
    trunk/gcc/testsuite/ChangeLog