OSDN Git Service

* sem_ch8.adb (Find_Type): If node is a reference to 'Base and the
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 8 Dec 2004 11:48:53 +0000 (11:48 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Wed, 8 Dec 2004 11:48:53 +0000 (11:48 +0000)
commit3b328983cfea931fda6aee39e7976bd4c4fb1f29
tree51fe8a2c3c267829f3470e2788399458d5720f36
parente8a502abe49001ae87b658156f9a0fb8c1f60776
* sem_ch8.adb (Find_Type): If node is a reference to 'Base and the
prefix is not a scalar type, place error message on prefix, not on
type entity.

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