From e4f17bd00b6c2cf9ca0eed666120f0c70ff71e89 Mon Sep 17 00:00:00 2001
From: charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Mon, 5 Sep 2011 13:02:49 +0000
Subject: [PATCH] Fix typo.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@178533 138bc75d-0d04-0410-961f-82ee72b054a4
---
 gcc/ada/lib-xref-alfa.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/ada/lib-xref-alfa.adb b/gcc/ada/lib-xref-alfa.adb
index c58f600..dd3c78c 100644
--- 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;
-- 
2.7.4