]> git.feebdaed.xyz Git - 0xmirror/gcc.git/commit
Ada: Fix internal error on illegal aggregate for private type
authorEric Botcazou <ebotcazou@adacore.com>
Thu, 11 Dec 2025 09:07:15 +0000 (10:07 +0100)
committerEric Botcazou <ebotcazou@adacore.com>
Thu, 11 Dec 2025 12:37:30 +0000 (13:37 +0100)
commit6f810e35d3edba3a9bfd31b0ce08b5331df7ae47
treef0b16692e6e08926c51d1facec4017fa315213c0
parent680df0a476512393e6e9cbd0255d3863baacf826
Ada: Fix internal error on illegal aggregate for private type

This just adds a guard for illegal cases to Resolve_Record_Aggregate.

gcc/ada/
PR ada/123088
* sem_aggr.adb (Resolve_Record_Aggregate): Add missing guard.

gcc/testsuite/
* gnat.dg/aggr33.adb: New test.
gcc/ada/sem_aggr.adb
gcc/testsuite/gnat.dg/aggr33.adb [new file with mode: 0644]