ada: Minor tweak to test added in previous change

This changes the test to use the common idion of the codebase.

gcc/ada/

	* exp_util.adb (Make_CW_Equivalent_Type) <Has_Tag_Of_Type>: Tweak.

diff --git a/gcc/ada/exp_util.adb b/gcc/ada/exp_util.adb
index 245c3cd9dc7e8b980f280e8bf79c060f490b5fe5..ab4b18da5386a278f646ab048c697020e142872f 100644 (file)
--- a/gcc/ada/exp_util.adb
+++ b/gcc/ada/exp_util.adb
@@ -9731,7 +9731,7 @@ package body Exp_Util is
          --  identifies T.
 
          if Is_Entity_Name (Exp)
-           and then Ekind (Entity (Exp)) in Constant_Or_Variable_Kind
+           and then Ekind (Entity (Exp)) in E_Constant | E_Variable
          then
             return True;