https://gcc.gnu.org/g:b6bfc77fe56ac999d515fe3899afbab0eb0ee480
commit r16-5906-gb6bfc77fe56ac999d515fe3899afbab0eb0ee480 Author: Eric Botcazou <[email protected]> Date: Thu Nov 20 21:54:03 2025 +0100 ada: Fix problematic aggregate with box notation It runs afoul of the pragma Initialize_Scalars + -gnatVa combination. gcc/ada/ChangeLog: * sem_ch12.adb (Remove_Parent): Only set the Is_Transient component of the local scope stack entry. Diff: --- gcc/ada/sem_ch12.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb index a5df3e535fa4..d3403074ce47 100644 --- a/gcc/ada/sem_ch12.adb +++ b/gcc/ada/sem_ch12.adb @@ -16929,7 +16929,7 @@ package body Sem_Ch12 is Scope_Stack.Decrement_Last; S := Current_Scope; else - SE := (Is_Transient => False, others => <>); + SE.Is_Transient := False; end if; -- After child instantiation is complete, remove from scope stack the
