OSDN Git Service

* sem_ch10.adb (Install_Withed_Unit): If the unit is a generic instance
authorbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 11 Dec 2001 23:27:40 +0000 (23:27 +0000)
committerbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 11 Dec 2001 23:27:40 +0000 (23:27 +0000)
commitd0cb8b4c2e7ed520fc340fc79f4bafed68d9f1db
tree20471bbeacf06ec0d9b47d29e54e88c99e53cff3
parent9ffca0cd58b37593feacfcbfd9e10c767ab16f49
* sem_ch10.adb (Install_Withed_Unit): If the unit is a generic instance
that is the parent of other generics, the instance body replaces the
instance node.  Retrieve the instance of the spec, which is the one
that is visible in clients and within the body.

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