Ada: Adjust fix for internal error on illegal aggregate for private type This adds a more robust guard to Resolve_Record_Aggregate. gcc/ada/ PR ada/123088 * sem_aggr.adb (Resolve_Record_Aggregate): Add more robust guard.