[Bug ada/123088] internal error on illegal aggregate for private type

[cvs-commit at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=123088

--- Comment #4 from GCC Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Eric Botcazou <ebotcazou@gcc.gnu.org>:

https://gcc.gnu.org/g:6f810e35d3edba3a9bfd31b0ce08b5331df7ae47

commit r16-6024-g6f810e35d3edba3a9bfd31b0ce08b5331df7ae47
Author: Eric Botcazou <ebotcazou@adacore.com>
Date:   Thu Dec 11 10:07:15 2025 +0100

    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.