diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-01-23 20:12:36 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-01-23 20:12:36 +0100 |
| commit | be5e5caa74f6dd084a62c481a2e72acffc708a2b (patch) | |
| tree | 76903fa40b8a802230aade541bcabed66a4fd284 /src | |
| parent | ec4ef7f6e18595c78db27946f38235503c725d88 (diff) | |
| download | ghdl-be5e5caa74f6dd084a62c481a2e72acffc708a2b.tar.gz ghdl-be5e5caa74f6dd084a62c481a2e72acffc708a2b.tar.bz2 ghdl-be5e5caa74f6dd084a62c481a2e72acffc708a2b.zip | |
adjust previous patch.
Diffstat (limited to 'src')
| -rw-r--r-- | src/vhdl/sem_names.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/vhdl/sem_names.adb b/src/vhdl/sem_names.adb index 939b095f4..ad82e329f 100644 --- a/src/vhdl/sem_names.adb +++ b/src/vhdl/sem_names.adb @@ -1095,8 +1095,9 @@ package body Sem_Names is return; end if; - Prefix := Name_To_Analyzed_Name (Get_Prefix (Attr)); + Prefix := Finish_Sem_Name (Get_Prefix (Attr)); Free_Iir (Attr_Name); + Set_Prefix (Attr, Prefix); Prefix_Type := Get_Type (Prefix); Prefix_Bt := Get_Base_Type (Prefix_Type); |