diff options
author | Tristan Gingold <tgingold@free.fr> | 2019-10-06 12:59:15 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2019-10-06 12:59:15 +0200 |
commit | fd7ce659ef9b61483dd40419552aa8036fa95bd0 (patch) | |
tree | 70c1e9e1bd750cbdfb0e48e7fe102d5a7ff5300c /src/synth/netlists-disp_vhdl.adb | |
parent | 874ee1a5fb4c40bfc5a0b64669dfa495a8c44736 (diff) | |
download | ghdl-fd7ce659ef9b61483dd40419552aa8036fa95bd0.tar.gz ghdl-fd7ce659ef9b61483dd40419552aa8036fa95bd0.tar.bz2 ghdl-fd7ce659ef9b61483dd40419552aa8036fa95bd0.zip |
netlists: Remove Get_Name renaming for instances.
Diffstat (limited to 'src/synth/netlists-disp_vhdl.adb')
-rw-r--r-- | src/synth/netlists-disp_vhdl.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/synth/netlists-disp_vhdl.adb b/src/synth/netlists-disp_vhdl.adb index 2f6c63628..2e601e05e 100644 --- a/src/synth/netlists-disp_vhdl.adb +++ b/src/synth/netlists-disp_vhdl.adb @@ -153,7 +153,7 @@ package body Netlists.Disp_Vhdl is if Is_Self_Instance (Inst) then Put_Name (Get_Input_Desc (Get_Module (Inst), Idx).Name); else - Inst_Name := Get_Name (Inst); + Inst_Name := Get_Instance_Name (Inst); Put_Name (Inst_Name); case Get_Sname_Kind (Inst_Name) is when Sname_Version => @@ -179,7 +179,7 @@ package body Netlists.Disp_Vhdl is First : Boolean; begin Put (" "); - Name := Get_Name (Inst); + Name := Get_Instance_Name (Inst); if Get_Sname_Kind (Name) = Sname_Version then Put ("inst_"); Put_Name_Version (Name); |