[Ada] Fix small fallout of previous change for Analyze_Selected_Component
authorEric Botcazou <ebotcazou@adacore.com>
Sat, 2 May 2020 15:35:02 +0000 (17:35 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Fri, 19 Jun 2020 08:17:26 +0000 (04:17 -0400)
commitce716aaaa3efb464af4caa16d8f75814c401b593
tree0843ed72fea0fe21531ab65874e20b906ab7d619
parent1e400f33e172020a4a3e357ee99c63e3ee97376d
[Ada] Fix small fallout of previous change for Analyze_Selected_Component

2020-06-19  Eric Botcazou  <ebotcazou@adacore.com>

gcc/ada/

* sem_ch3.adb (Is_Visible_Component): Reason only on the private
status of the original type in an instance body.
gcc/ada/sem_ch3.adb