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.
1 file changed