diff options
author | Tristan Gingold <tgingold@free.fr> | 2018-04-24 18:44:25 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2018-04-24 18:44:25 +0200 |
commit | 1d7382e75a52bd418f25b76dfb290081269b7b7f (patch) | |
tree | 0eee4a36c0e80f15f98a78162b567f541626c57d /src/vhdl | |
parent | cc58394a9711a0f32232988645563cb7d27a6c6d (diff) | |
download | ghdl-1d7382e75a52bd418f25b76dfb290081269b7b7f.tar.gz ghdl-1d7382e75a52bd418f25b76dfb290081269b7b7f.tar.bz2 ghdl-1d7382e75a52bd418f25b76dfb290081269b7b7f.zip |
sem_scopes: correctly handle conflicting potential visibility.
Fix #560
Diffstat (limited to 'src/vhdl')
-rw-r--r-- | src/vhdl/sem_scopes.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/vhdl/sem_scopes.adb b/src/vhdl/sem_scopes.adb index 907b5eeff..708d56d2f 100644 --- a/src/vhdl/sem_scopes.adb +++ b/src/vhdl/sem_scopes.adb @@ -428,13 +428,13 @@ package body Sem_Scopes is Last_In_Region := Ident; end Add_New_Interpretation; begin - if not Valid_Interpretation (Current_Inter) then + if not Valid_Interpretation (Raw_Inter) then -- Very simple: no hidding, no overloading. Add_New_Interpretation (True); return; end if; - if Is_Conflict_Declaration (Current_Inter) then + if Is_Conflict_Declaration (Raw_Inter) then if Potentially then -- Yet another conflicting interpretation. return; |