diff options
author | Eric Botcazou <ebotcazou@adacore.com> | 2023-07-03 00:33:18 +0200 |
---|---|---|
committer | Marc Poulhiès <poulhies@adacore.com> | 2023-07-11 11:24:28 +0200 |
commit | 8957121b8bf4be7eb7f9de31b810ea01594a670e (patch) | |
tree | 825b70cf48c020fe3c2b16c8579c08a1f9f84d88 /libgcc | |
parent | 312839653b8295599c63cae90278a87af528edad (diff) | |
download | gcc-8957121b8bf4be7eb7f9de31b810ea01594a670e.zip gcc-8957121b8bf4be7eb7f9de31b810ea01594a670e.tar.gz gcc-8957121b8bf4be7eb7f9de31b810ea01594a670e.tar.bz2 |
ada: Fix wrong resolution for hidden discriminant in predicate
The problem occurs for hidden discriminants of private discriminated types.
gcc/ada/
* sem_ch13.adb (Replace_Type_References_Generic.Visible_Component):
In the case of private discriminated types, return a discriminant
only if it is listed in the discriminant part of the declaration.
Diffstat (limited to 'libgcc')
0 files changed, 0 insertions, 0 deletions