From 1e32a22c5ebbb52402aa1e45734bd9ec8f206c15 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Fri, 16 Apr 2021 20:25:35 +0200
Subject: vhdl-sem_names: avoid a crash for invalid user attribute prefix.  Fix
 #1727

---
 src/vhdl/vhdl-sem_names.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/vhdl/vhdl-sem_names.adb b/src/vhdl/vhdl-sem_names.adb
index cb03d4690..ab4451d77 100644
--- a/src/vhdl/vhdl-sem_names.adb
+++ b/src/vhdl/vhdl-sem_names.adb
@@ -3322,7 +3322,8 @@ package body Vhdl.Sem_Names is
                              & "an attribute");
             return Error_Mark;
          when Iir_Kind_Function_Call
-           | Iir_Kind_Type_Conversion =>
+           | Iir_Kind_Type_Conversion
+           | Iir_Kinds_Attribute =>
             Error_Msg_Sem (+Attr, "invalid prefix for user defined attribute");
             return Error_Mark;
          when Iir_Kinds_Object_Declaration
-- 
cgit v1.2.3