diff options
-rw-r--r-- | src/synth/synth-insts.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/synth/synth-insts.adb b/src/synth/synth-insts.adb index 725ac2b22..a2268394e 100644 --- a/src/synth/synth-insts.adb +++ b/src/synth/synth-insts.adb @@ -299,8 +299,7 @@ package body Synth.Insts is when Port_In => Connect (Get_Input (Inst, Nbr_Inputs), - Get_Net (Synth_Expression_With_Type - (Syn_Inst, Actual, Get_Type (Assoc_Inter)))); + Get_Net (Synth_Expression (Syn_Inst, Actual))); Nbr_Inputs := Nbr_Inputs + 1; when Port_Out | Port_Inout => |