diff options
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 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); |