diff options
author | Steve Baird <baird@adacore.com> | 2024-08-05 15:53:12 -0700 |
---|---|---|
committer | Marc Poulhiès <dkm@gcc.gnu.org> | 2024-08-29 15:06:28 +0200 |
commit | a50584b8a63b57913d0f213b51403953f799c962 (patch) | |
tree | 2a60623499bf343cbc9f6f250c519a6b003afde7 /gcc/gimple-loop-jam.cc | |
parent | 499406992f48cc8da64448a107f95e681cea9039 (diff) | |
download | gcc-a50584b8a63b57913d0f213b51403953f799c962.zip gcc-a50584b8a63b57913d0f213b51403953f799c962.tar.gz gcc-a50584b8a63b57913d0f213b51403953f799c962.tar.bz2 |
ada: Missing legality check when type completed
Refine previous fix to better handle tagged cases.
gcc/ada/
* sem_ch6.adb (Check_Discriminant_Conformance): Immediately after
calling Is_Immutably_Limited_Type, perform an additional test that
one might reasonably imagine would instead have been part of
Is_Immutably_Limited_Type. The new test is a call to a new
function Has_Tagged_Limited_Partial_View whose implementation
includes a call to Incomplete_Or_Partial_View, which cannot be
easily be called from Is_Immutably_Limited_Type (because sem_aux,
which is in the closure of the binder, cannot easily "with"
sem_util).
* sem_aux.adb (Is_Immutably_Limited): Include
N_Derived_Type_Definition case when testing Limited_Present flag.
Diffstat (limited to 'gcc/gimple-loop-jam.cc')
0 files changed, 0 insertions, 0 deletions