OSDN Git Service

* sem_ch7.adb (New_Private_Type): Set Is_Tagged_Type flag before
authorbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 5 Dec 2001 01:43:31 +0000 (01:43 +0000)
committerbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 5 Dec 2001 01:43:31 +0000 (01:43 +0000)
commitc8e5f2901142e22cd63a8f4557dd9eca17efb117
treeec4cdad4a6c00dd66fd4145cb13b57eb9462931d
parenta5d181df49a871686042e2b3173903bca5094d90
* sem_ch7.adb (New_Private_Type): Set Is_Tagged_Type flag before
processing discriminants to diagnose illegal default values.

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