sem_ch8.adb (Find_Type): If node is a reference to 'Base and the prefix is not a...
authorArnaud Charlet <charlet@gcc.gnu.org>
Wed, 8 Dec 2004 11:48:53 +0000 (12:48 +0100)
committerArnaud Charlet <charlet@gcc.gnu.org>
Wed, 8 Dec 2004 11:48:53 +0000 (12:48 +0100)
commitbc41faa231ce34036ff2217d887f75357f0aee77
tree51fe8a2c3c267829f3470e2788399458d5720f36
parente2d6a9e577a281708dabbfd4666ae1b6bdd5d018
sem_ch8.adb (Find_Type): If node is a reference to 'Base and the prefix is not a scalar type...

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

From-SVN: r91894
gcc/ada/sem_ch8.adb