From 7748a70eb1aa9da5b8033a8955d8827385893075 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sun, 6 Oct 2019 13:10:00 +0200
Subject: netlists: remove get_parent renaming for input.

---
 src/synth/netlists.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/synth/netlists.adb')

diff --git a/src/synth/netlists.adb b/src/synth/netlists.adb
index c22302716..6597be8ed 100644
--- a/src/synth/netlists.adb
+++ b/src/synth/netlists.adb
@@ -572,7 +572,7 @@ package body Netlists is
    function Get_Port_Idx (I : Input) return Port_Idx
    is
       pragma Assert (Is_Valid (I));
-      Parent : constant Instance := Get_Parent (I);
+      Parent : constant Instance := Get_Input_Parent (I);
    begin
       return Port_Idx (I - Instances_Table.Table (Parent).First_Input);
    end Get_Port_Idx;
-- 
cgit v1.2.3