diff options
Diffstat (limited to 'src/synth/netlists.adb')
| -rw-r--r-- | src/synth/netlists.adb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/synth/netlists.adb b/src/synth/netlists.adb index 545a4df16..d130b7c1f 100644 --- a/src/synth/netlists.adb +++ b/src/synth/netlists.adb @@ -157,7 +157,8 @@ package body Netlists is begin Ports_Desc := Port_Desc_Table.Last + 1; for I in 1 .. Nbr_Inputs + Nbr_Outputs loop - Port_Desc_Table.Append ((Name => No_Sname, W => 0)); + Port_Desc_Table.Append + ((Name => No_Sname, Is_Inout => False, W => 0)); end loop; Modules_Table.Append @@ -952,6 +953,7 @@ begin pragma Assert (Inputs_Table.Last = No_Input); Port_Desc_Table.Append ((Name => No_Sname, + Is_Inout => False, W => 0)); pragma Assert (Port_Desc_Table.Last = No_Port_Desc_Idx); |