sem_ch3.adb (Build_Incomplete_Type_Declaration): In the case of an untagged private...
authorBob Duff <duff@adacore.com>
Tue, 27 May 2008 12:36:23 +0000 (14:36 +0200)
committerArnaud Charlet <charlet@gcc.gnu.org>
Tue, 27 May 2008 12:36:23 +0000 (14:36 +0200)
commitd33fb1e6debbc2ae26e323685fd9ce321ba65418
tree8104c2a196c4475cd68d877387cf3f4fc233987f
parent592b9a75fcfc1c857eb7f085bd9eec541262ed68
sem_ch3.adb (Build_Incomplete_Type_Declaration): In the case of an untagged private type with a tagged full type...

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".

From-SVN: r136025
gcc/ada/sem_ch3.adb