diff options
| author | Tristan Gingold <tgingold@free.fr> | 2018-12-18 18:14:40 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2018-12-18 18:19:30 +0100 |
| commit | 48b78095ffa8bf349bec312d14812df264cacc32 (patch) | |
| tree | d3477dc99f57878d99c54394bc6f5e1af70f4201 /src/vhdl/sem_assocs.adb | |
| parent | 7624e7bd83a1fea5b38f81a2d68f27acb78ed7a9 (diff) | |
| download | ghdl-48b78095ffa8bf349bec312d14812df264cacc32.tar.gz ghdl-48b78095ffa8bf349bec312d14812df264cacc32.tar.bz2 ghdl-48b78095ffa8bf349bec312d14812df264cacc32.zip | |
iir_kind_selected_element: use Named_Entity for homogeneity.
Diffstat (limited to 'src/vhdl/sem_assocs.adb')
| -rw-r--r-- | src/vhdl/sem_assocs.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/sem_assocs.adb b/src/vhdl/sem_assocs.adb index fda27f750..251563c3f 100644 --- a/src/vhdl/sem_assocs.adb +++ b/src/vhdl/sem_assocs.adb @@ -739,7 +739,7 @@ package body Sem_Assocs is procedure Add_Individual_Assoc_Selected_Name (Choice : out Iir; Sub_Assoc : Iir; Formal : Iir) is - Element : constant Iir := Get_Selected_Element (Formal); + Element : constant Iir := Get_Named_Entity (Formal); Last_Choice : Iir; begin -- Try to find the existing choice. |