diff options
Diffstat (limited to 'src/vhdl/disp_vhdl.adb')
| -rw-r--r-- | src/vhdl/disp_vhdl.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/disp_vhdl.adb b/src/vhdl/disp_vhdl.adb index 37e6f21c6..b803a1c37 100644 --- a/src/vhdl/disp_vhdl.adb +++ b/src/vhdl/disp_vhdl.adb @@ -2912,7 +2912,7 @@ package body Disp_Vhdl is when Iir_Kind_Selected_Element => Disp_Expression (Get_Prefix (Expr)); Put ("."); - Disp_Name_Of (Get_Selected_Element (Expr)); + Disp_Name_Of (Get_Named_Entity (Expr)); when Iir_Kind_Implicit_Dereference => Disp_Expression (Get_Prefix (Expr)); when Iir_Kind_Dereference => |