OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Ada] Remove repeated setting of Never_Set_In_Source

Browse Source 
Formal parameters have their flag Never_Set_In_Source set at the
beginning of Process_Formals routine (regardless of the parameter mode).
There is no need to set it again when Process_Formals calls
Set_Formal_Mode (for parameters of mode IN OUT and OUT).

Code cleanup related to improved detection of uninitialised objects;
behaviour is unaffected.

gcc/ada/

	* sem_ch6.adb (Set_Formal_Mode): Remove unnecessary setting of
	Never_Set_In_Source.
This commit is contained in:
Piotr Trojanek 2022-06-08 20:52:48 +02:00 committed by Pierre-Marie de Rodat
parent 6ba8c078ca
commit c96dcf0550
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gcc/ada/sem_ch6.adb
View File

@ -13298,10 +13298,9 @@ package body Sem_Ch6 is
Mutate_Ekind (Formal_Id, E_In_Out_Parameter);
else
Mutate_Ekind (Formal_Id, E_Out_Parameter);
Set_Never_Set_In_Source (Formal_Id, True);
Set_Is_True_Constant (Formal_Id, False);
Set_Current_Value (Formal_Id, Empty);
Mutate_Ekind (Formal_Id, E_Out_Parameter);
Set_Is_True_Constant (Formal_Id, False);
Set_Current_Value (Formal_Id, Empty);
end if;
else