2008-05-27 Gary Dismukes <dismukes@adacore.com>
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 27 May 2008 08:50:04 +0000 (08:50 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 27 May 2008 08:50:04 +0000 (08:50 +0000)
commit3b168b3ae3531268dfd7d97ecd6ccc32cb841a20
treecc84d84cd3df9c42fd27fb77354cf4e22757f942
parenta735d663a439ee76661cc10a189daa162e049d13
2008-05-27  Gary Dismukes  <dismukes@adacore.com>

* sem_ch3.adb (Fixup_Bad_Constraint): Set the Etype on the bad subtype
to the known type entity E, rather than setting it to Any_Type. Fixes
possible blowup in function Base_Init_Proc, as called from Freeze_Entity
for objects whose type had an illegal constraint.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135979 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/sem_ch3.adb