diff options
author | Javier Miranda <miranda@adacore.com> | 2023-04-03 17:15:47 +0000 |
---|---|---|
committer | Marc Poulhiès <poulhies@adacore.com> | 2023-05-29 10:23:19 +0200 |
commit | 265c571daa41fdf4d21e06c55703f65ec9aad8c4 (patch) | |
tree | 232540487c7c42ea2c2091697444e6992b24d9ea /gcc/ada/sem_ch4.ads | |
parent | 204ecf39ca639cf77de1cc4a510a369fa2f91798 (diff) | |
download | gcc-265c571daa41fdf4d21e06c55703f65ec9aad8c4.zip gcc-265c571daa41fdf4d21e06c55703f65ec9aad8c4.tar.gz gcc-265c571daa41fdf4d21e06c55703f65ec9aad8c4.tar.bz2 |
ada: Crash on aggregate for tagged record with discriminants
The frontend may crash processing an aggregate initializing
a derived tagged record type that has discriminants.
gcc/ada/
* sem_aggr.adb
(Resolve_Record_Aggregate): For aggregates of derived tagged
record types with discriminants, when collecting components
from ancestors, pass to subprogram Gather_Components the
parent type. Required to report errors on wrong aggregate
components.
Diffstat (limited to 'gcc/ada/sem_ch4.ads')
0 files changed, 0 insertions, 0 deletions