ada: Avoid suspicious index warnings in expanded code

Some expansions and optimizations wrap the existing code in
functions that loose the range constraints of the original
variable. We should avoid triggering bogus errors in such scenarios.

gcc/ada/ChangeLog:

	* sem_warn.adb (Warn_On_Suspicious_Index): Only check elements
	that are coming from source.