aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/netlists-disp_vhdl.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/netlists-disp_vhdl.adb')
-rw-r--r--src/synth/netlists-disp_vhdl.adb4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/synth/netlists-disp_vhdl.adb b/src/synth/netlists-disp_vhdl.adb
index 6bf6701a5..154f9f361 100644
--- a/src/synth/netlists-disp_vhdl.adb
+++ b/src/synth/netlists-disp_vhdl.adb
@@ -256,7 +256,7 @@ package body Netlists.Disp_Vhdl is
begin
I := Get_First_Sink (O);
if I /= No_Input then
- O_Inst := Get_Parent (I);
+ O_Inst := Get_Input_Parent (I);
else
O_Inst := No_Instance;
end if;
@@ -410,7 +410,7 @@ package body Netlists.Disp_Vhdl is
begin
I := Get_First_Sink (Get_Output (Inst, 0));
while I /= No_Input loop
- if Need_Name (Get_Parent (I)) then
+ if Need_Name (Get_Input_Parent (I)) then
return True;
end if;
I := Get_Next_Sink (I);