diff options
| -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 a863c3118..0190ee1a4 100644 --- a/src/vhdl/sem_names.adb +++ b/src/vhdl/sem_names.adb @@ -2091,7 +2091,8 @@ package body Sem_Names is while Is_Valid (It) loop El := Get_Element (It); case Get_Kind (El) is - when Iir_Kind_Function_Call => + when Iir_Kind_Function_Call + | Iir_Kind_Selected_Element => -- Not an expanded name. null; when others => |