diff options
author | Tristan Gingold | 2016-01-07 06:47:40 +0100 |
---|---|---|
committer | Tristan Gingold | 2016-01-07 06:47:40 +0100 |
commit | 23545327c7801d5b1fa5c9bd520ff243fccceab6 (patch) | |
tree | d9e69250af43f8c7f3f3ab81614a3872b4cb4032 /src | |
parent | 1b5f6929a45cd03aff1ed8077fa6cb0b3aa31885 (diff) | |
download | ghdl-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.adb | 2 |
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. |