diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb index 64b5b01869dab602e215f45197013e4d1d82d3a2..defa0d7879492fa170bf01ce20adfd671b5ac185 100644 --- a/gcc/ada/sem_prag.adb +++ b/gcc/ada/sem_prag.adb @@ -14791,7 +14791,7 @@ package body Sem_Prag is GNAT_Pragma; Check_Valid_Configuration_Pragma; Check_Arg_Count (1); - Check_Optional_Identifier (Arg1, "max_size"); + Check_Optional_Identifier (Arg1, Name_Max_Size); Arg := Get_Pragma_Arg (Arg1); Check_Arg_Is_OK_Static_Expression (Arg, Any_Integer);