aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/sem_assocs.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/sem_assocs.adb')
-rw-r--r--src/vhdl/sem_assocs.adb2
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.