r116981 - in /trunk/gcc: ada/ChangeLog ada/decl...

[ebotcazou@gcc.gnu.org]

Author: ebotcazou
Date: Fri Sep 15 18:32:24 2006
New Revision: 116981

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=116981
Log:
	PR ada/15802
	* decl.c (same_discriminant_p): New static function.
	(gnat_to_gnu_entity) <E_Record_Type>: When there is a parent
	subtype and we have discriminants, fix up the COMPONENT_REFs
	for the discriminants to make them reference the corresponding
	fields of the parent subtype after it has been built.


Added:
    trunk/gcc/testsuite/gnat.dg/specs/double_record_extension1.ads
    trunk/gcc/testsuite/gnat.dg/specs/double_record_extension2.ads
Modified:
    trunk/gcc/ada/ChangeLog
    trunk/gcc/ada/decl.c
    trunk/gcc/testsuite/ChangeLog