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

[Ada] Replace repeated Ekind with Ekind_In

Browse Source 
2020-06-15  Piotr Trojanek  <trojanek@adacore.com>

gcc/ada/

	* exp_ch6.adb (Expand_Call_Helper): Replace repeated Ekind with
	Ekind_In.
This commit is contained in:
Piotr Trojanek 2020-03-24 00:04:11 +01:00 committed by Pierre-Marie de Rodat
parent 7a1d54fa61
commit 50188982c8
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gcc/ada/exp_ch6.adb
View File

@ -4128,8 +4128,7 @@ package body Exp_Ch6 is
-- and reanalyzed (see Expand_Protected_Subprogram_Call).
elsif Is_Protected_Type (Scope (Subp))
and then (Ekind (Subp) = E_Procedure
or else Ekind (Subp) = E_Function)
and then Ekind_In (Subp, E_Procedure, E_Function)
then
null;