From 7624e7bd83a1fea5b38f81a2d68f27acb78ed7a9 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 18 Dec 2018 18:11:08 +0100
Subject: sem_scopes: do not warn when an element declaration hides a
 declaration.

---
 src/vhdl/sem_scopes.adb | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/vhdl/sem_scopes.adb b/src/vhdl/sem_scopes.adb
index 2f70832e0..617f7bedc 100644
--- a/src/vhdl/sem_scopes.adb
+++ b/src/vhdl/sem_scopes.adb
@@ -416,6 +416,11 @@ package body Sem_Scopes is
          return;
       end if;
 
+      if Get_Kind (Decl) = Iir_Kind_Element_Declaration then
+         --  Do not warn for record elements.  They are used by selection.
+         return;
+      end if;
+
       if Decl = Prev_Decl then
          --  Can happen in configuration.  No real hidding.
          return;
-- 
cgit v1.2.3