ada: Fix wrong visibility over discriminants

This patch fixes an issue where the compiler was incorrectly allowing
references to discriminants of the ancestor type in private type
extensions.

gcc/ada/ChangeLog:

	* sem_ch3.adb (Build_Derived_Private_Type): Fix test.
	(Build_Derived_Record_Type): Adjust error recovery paths.
1 file changed