summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorTristan Gingold2016-01-07 06:47:40 +0100
committerTristan Gingold2016-01-07 06:47:40 +0100
commit23545327c7801d5b1fa5c9bd520ff243fccceab6 (patch)
treed9e69250af43f8c7f3f3ab81614a3872b4cb4032 /src
parent1b5f6929a45cd03aff1ed8077fa6cb0b3aa31885 (diff)
downloadghdl-23545327c7801d5b1fa5c9bd520ff243fccceab6.tar.gz
ghdl-23545327c7801d5b1fa5c9bd520ff243fccceab6.tar.bz2
ghdl-23545327c7801d5b1fa5c9bd520ff243fccceab6.zip
Keep alias in use clauses. Fix issue 15.
Diffstat (limited to 'src')
-rw-r--r--src/vhdl/sem.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/sem.adb b/src/vhdl/sem.adb
index ca34030..bba4075 100644
--- a/src/vhdl/sem.adb
+++ b/src/vhdl/sem.adb
@@ -2744,7 +2744,7 @@ package body Sem is
case Get_Kind (Name) is
when Iir_Kind_Selected_Name =>
- Sem_Name (Name);
+ Sem_Name (Name, True);
case Get_Kind (Get_Named_Entity (Name)) is
when Iir_Kind_Error =>
-- Continue in case of error.