From 1d7382e75a52bd418f25b76dfb290081269b7b7f Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 24 Apr 2018 18:44:25 +0200
Subject: sem_scopes: correctly handle conflicting potential visibility.

Fix #560
---
 src/vhdl/sem_scopes.adb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/vhdl')

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;
-- 
cgit v1.2.3