https://gcc.gnu.org/g:d9a80d7dd32c9adaab1f16b848d43cdda81d0d53
commit r16-2004-gd9a80d7dd32c9adaab1f16b848d43cdda81d0d53 Author: Ronan Desplanques <desplanq...@adacore.com> Date: Tue Jun 17 10:13:20 2025 +0200 ada: Fix error on Designated_Storage_Model with extensions disabled The format string used for the error in that case requires setting the Error_Msg_Name_1 global variable. This was not done so this patch adds the missing assignment. gcc/ada/ChangeLog: * sem_ch13.adb (Analyze_Aspect_Specifications): Fix error emission. Diff: --- gcc/ada/sem_ch13.adb | 1 + 1 file changed, 1 insertion(+) diff --git a/gcc/ada/sem_ch13.adb b/gcc/ada/sem_ch13.adb index 1e88ef4b48db..d080e307542c 100644 --- a/gcc/ada/sem_ch13.adb +++ b/gcc/ada/sem_ch13.adb @@ -4634,6 +4634,7 @@ package body Sem_Ch13 is when Aspect_Designated_Storage_Model => if not All_Extensions_Allowed then + Error_Msg_Name_1 := Nam; Error_Msg_GNAT_Extension ("aspect %", Loc); goto Continue;