From 4e14fae9d15aff52f2c6b57c77e69907666a6d99 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Mon, 5 Jul 2021 18:27:57 +0200
Subject: vhdl-sem_scopes.adb: consider operators for interface chain

A type interface also implicitly declares equality and inequality
operators for the type.  Adjust Add_Declaration_From_Interface_Chain
so that these operators are visible
---
 src/vhdl/vhdl-sem_scopes.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/vhdl/vhdl-sem_scopes.adb b/src/vhdl/vhdl-sem_scopes.adb
index 0a4396636..099a9c62a 100644
--- a/src/vhdl/vhdl-sem_scopes.adb
+++ b/src/vhdl/vhdl-sem_scopes.adb
@@ -1243,7 +1243,8 @@ package body Vhdl.Sem_Scopes is
          --  anonymous and there is no need to iterate.
          exit when Id = Null_Identifier;
 
-         Add_Name (El, Id, False);
+         Add_Declaration (El, False);
+
          El := Get_Chain (El);
       end loop;
    end Add_Declarations_From_Interface_Chain;
-- 
cgit v1.2.3