From 192f73f79c4f275a18c398e5f85e12dd5a62391b Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 29 May 2014 13:43:47 +0200
Subject: sem_decls: handle alias of component.

---
 sem_decls.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/sem_decls.adb b/sem_decls.adb
index 02ca65919..09042c404 100644
--- a/sem_decls.adb
+++ b/sem_decls.adb
@@ -2011,7 +2011,8 @@ package body Sem_Decls is
          when Iir_Kinds_Object_Declaration =>
             raise Internal_Error;
          when Iir_Kind_Subtype_Declaration
-           | Iir_Kind_Attribute_Declaration =>
+           | Iir_Kind_Attribute_Declaration
+           | Iir_Kind_Component_Declaration =>
             null;
          when Iir_Kind_Terminal_Declaration =>
             null;
-- 
cgit v1.2.3