commit 78f13b008ab58794057847a74903ee4569829d80
author Justin Squirek <squirek@adacore.com> Thu May 26 15:02:01 2022 +0000
committer Pierre-Marie de Rodat <derodat@adacore.com> Mon Jul 04 07:45:57 2022 +0000
tree 47c9f8365e4c74f6bd251424084d409f0edbe251
parent 1fde86bba55ea61b56f79798c6ac4cc6808e51a1

[Ada] Tech debt: Remove code duplication

This patch corrects removes some code duplication within the GNAT
compiler.

gcc/ada/

	* exp_util.adb (Remove_Side_Effects): Combine identical
	branches.
	* sem_attr.adb (Analyze_Attribute): Combine identical cases
	Attribute_Has_Same_Storage and Attribute_Overlaps_Storage.
	* sem_prag.adb (Check_Role): Combine E_Out_Parameter case with
	general case for parameters.
	* sem_util.adb (Accessibility_Level): Combine identical
	branches.
	* sprint.adb (Sprint_Node_Actual): Combine cases for
	N_Real_Range_Specification and N_Signed_Integer_Type_Definition.