r136025 - /trunk/gcc/ada/sem_ch3.adb

[charlet@gcc.gnu.org]

Author: charlet
Date: Tue May 27 12:36:23 2008
New Revision: 136025

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=136025
Log:
2008-05-27  Bob Duff  <duff@adacore.com>

	* sem_ch3.adb (Build_Incomplete_Type_Declaration): In the case of an
	untagged private type with a tagged full type, where the full type has
	a self reference, create the corresponding class-wide type early, in
	case the self reference is "access T'Class".


Modified:
    trunk/gcc/ada/sem_ch3.adb