Fix typo.

From-SVN: r178533

diff --git a/gcc/ada/lib-xref-alfa.adb b/gcc/ada/lib-xref-alfa.adb
index c58f600d88c626872b0ed2c9e825731d5a1acdaa..dd3c78cb2dd555603d39f4e291d7715f6b5f3c3e 100644 (file)
--- a/gcc/ada/lib-xref-alfa.adb
+++ b/gcc/ada/lib-xref-alfa.adb
@@ -627,7 +627,7 @@ package body Alfa is
                   --  references.
 
                   if Present (Etype (E))
-                    and then Ekind (Etype (E)) in E_Concurrent_Kind
+                    and then Ekind (Etype (E)) in Concurrent_Kind
                   then
                      return False;
                   end if;