diff options
author | Tristan Gingold <tgingold@free.fr> | 2021-07-05 18:27:57 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2021-07-05 18:27:57 +0200 |
commit | 4e14fae9d15aff52f2c6b57c77e69907666a6d99 (patch) | |
tree | 3b4011e84e1e0700f282679cd347a4381c5b03b5 /src/vhdl | |
parent | d48376d15bb9d16f860a18302ca5a3e1bd6be156 (diff) | |
download | ghdl-4e14fae9d15aff52f2c6b57c77e69907666a6d99.tar.gz ghdl-4e14fae9d15aff52f2c6b57c77e69907666a6d99.tar.bz2 ghdl-4e14fae9d15aff52f2c6b57c77e69907666a6d99.zip |
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
Diffstat (limited to 'src/vhdl')
-rw-r--r-- | src/vhdl/vhdl-sem_scopes.adb | 3 |
1 files changed, 2 insertions, 1 deletions
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; |