From 7784fd83f47763efc5126b96cebc322f3311774e Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 1 Oct 2016 17:02:27 +0200
Subject: Consider object for array attribute.

Fix issue #151
---
 src/vhdl/evaluation.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src/vhdl/evaluation.adb')

diff --git a/src/vhdl/evaluation.adb b/src/vhdl/evaluation.adb
index 06b8b5537..9c5f4cf3c 100644
--- a/src/vhdl/evaluation.adb
+++ b/src/vhdl/evaluation.adb
@@ -1488,7 +1488,8 @@ package body Evaluation is
            | Iir_Kind_Type_Declaration
            | Iir_Kind_Implicit_Dereference
            | Iir_Kind_Function_Call
-           | Iir_Kind_Attribute_Value =>
+           | Iir_Kind_Attribute_Value
+           | Iir_Kind_Attribute_Name =>
             Prefix_Type := Get_Type (Prefix);
          when Iir_Kinds_Subtype_Definition =>
             Prefix_Type := Prefix;
-- 
cgit v1.2.3