ada/
	* gcc-interface/trans.c (gnat_to_gnu) <case N_Slice>: In range
	check processing, remove unintended TREE_TYPE walk on index type
	to get to base type.

	testsuite/
	* gnat.dg/slice_enum.adb: New test.

From-SVN: r144774