[Ada] Fix a couple of oversights in previous change
authorEric Botcazou <ebotcazou@adacore.com>
Tue, 28 Jan 2020 22:52:17 +0000 (23:52 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 4 Jun 2020 09:11:16 +0000 (05:11 -0400)
commit198064c06a1e1e85cf498ad42983c5eab1f27c4a
tree618446b3ba0b021d2dfa5bce1c6acaa899fc90a8
parent110d0820bfcb421b8c680409cf5c65aa2a0b4b8e
[Ada] Fix a couple of oversights in previous change

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

gcc/ada/

* exp_ch7.adb (Make_Final_Call): Add missing guard.
* sem_ch3.adb (Copy_And_Build): Adjust recursive call for
private types.
(Build_Derived_Private_Type): Deal with underlying full views.
gcc/ada/exp_ch7.adb
gcc/ada/sem_ch3.adb