diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2023-09-16 20:29:20 +0200 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2023-09-26 13:43:18 +0200 |
| commit | f6367fc211e52b3f7f8d0f2c481e20cb69839071 (patch) | |
| tree | 1795eb0f41f0f5e72fc6d67b097e24f159b3eb52 /gcc/tree-ssa-phiopt.cc | |
| parent | a1c78073051327da96f2321234e71d302a6df671 (diff) | |
| download | gcc-f6367fc211e52b3f7f8d0f2c481e20cb69839071.zip gcc-f6367fc211e52b3f7f8d0f2c481e20cb69839071.tar.gz gcc-f6367fc211e52b3f7f8d0f2c481e20cb69839071.tar.bz2 | |
ada: Fix deferred constant wrongly rejected
This recent regression occurs when the nominal subtype of the constant is a
discriminated record type with default discriminants.
gcc/ada/
PR ada/110488
* sem_ch3.adb (Analyze_Object_Declaration): Do not build a default
subtype for a deferred constant in the definite case too.
Diffstat (limited to 'gcc/tree-ssa-phiopt.cc')
0 files changed, 0 insertions, 0 deletions