diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/vhdl/vhdl-sem.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-sem.adb b/src/vhdl/vhdl-sem.adb index aed94e118..ce0428476 100644 --- a/src/vhdl/vhdl-sem.adb +++ b/src/vhdl/vhdl-sem.adb @@ -1584,6 +1584,10 @@ package body Vhdl.Sem is Get_Prefix (Right)) and then Are_Trees_Equal (Get_Suffix (Left), Get_Suffix (Right)); + when Iir_Kind_Selected_Element => + return Are_Trees_Equal (Get_Prefix (Left), + Get_Prefix (Right)) + and then Get_Identifier (Left) = Get_Identifier (Right); when Iir_Kind_Access_Type_Definition | Iir_Kind_Record_Type_Definition |