[Ada] Crash on a nested aggregate containing controlled objects

gcc/ada/

	* exp_util.adb (Find_Hook_Context): Do not stop on an aggregate
	node.
1 file changed