[Ada] Fix small oversight in latest change for Replace_Discriminants
authorEric Botcazou <ebotcazou@adacore.com>
Fri, 13 Dec 2019 15:57:46 +0000 (16:57 +0100)
committerPierre-Marie de Rodat <derodat@adacore.com>
Tue, 2 Jun 2020 08:58:07 +0000 (04:58 -0400)
commit663091bc782563d7d9adc8b09e58afbac3656d13
treefce9dff3753c23c8e4ae06565c85c4826bdf51ac
parent25d744bb6cf7e3b9a91930caff9f88814f2c36ca
[Ada] Fix small oversight in latest change for Replace_Discriminants

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

gcc/ada/

* sem_ch3.adb (Replace_Discriminants): Preserve the Etype of the
Name of N_Variant_Part nodes when rewriting it.
gcc/ada/sem_ch3.adb