OSDN Git Service

Fix typo.
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 5 Sep 2011 13:02:49 +0000 (13:02 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 5 Sep 2011 13:02:49 +0000 (13:02 +0000)
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@178533 138bc75d-0d04-0410-961f-82ee72b054a4

gcc/ada/lib-xref-alfa.adb

index c58f600..dd3c78c 100644 (file)
@@ -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;