diff options
| author | Tristan Gingold <tgingold@free.fr> | 2019-07-17 06:21:41 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2019-07-17 06:21:41 +0200 |
| commit | 3a1f9c3fa9ef0224c4add88cd6020d8a933426ee (patch) | |
| tree | 3dbe5d17d6a299476e584ea4a23e11d3b802f1c9 /src/synth/synth-stmts.adb | |
| parent | 13b255a60d2dc00a1cecc2a2f3dbbd4b2313a919 (diff) | |
| download | ghdl-3a1f9c3fa9ef0224c4add88cd6020d8a933426ee.tar.gz ghdl-3a1f9c3fa9ef0224c4add88cd6020d8a933426ee.tar.bz2 ghdl-3a1f9c3fa9ef0224c4add88cd6020d8a933426ee.zip | |
synth: renaming of Assign to Seq_Assign.
Diffstat (limited to 'src/synth/synth-stmts.adb')
| -rw-r--r-- | src/synth/synth-stmts.adb | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/synth/synth-stmts.adb b/src/synth/synth-stmts.adb index 3e80ea63e..6fb9e9313 100644 --- a/src/synth/synth-stmts.adb +++ b/src/synth/synth-stmts.adb @@ -370,7 +370,7 @@ package body Synth.Stmts is (Choice_Data_Array, Choice_Data_Array_Acc); type Alternative_Data_Type is record - Asgns : Assign; + Asgns : Seq_Assign; Val : Net; end record; type Alternative_Data_Array is @@ -410,13 +410,13 @@ package body Synth.Stmts is return Natural is Res : Natural; - Asgn : Assign; + Asgn : Seq_Assign; W : Wire_Id; begin Res := 0; for I in Alts'Range loop Asgn := Alts (I).Asgns; - while Asgn /= No_Assign loop + while Asgn /= No_Seq_Assign loop W := Get_Wire_Id (Asgn); if not Wire_Id_Table.Table (W).Mark_Flag then Res := Res + 1; @@ -432,13 +432,13 @@ package body Synth.Stmts is Alts : Alternative_Data_Array) is Idx : Natural; - Asgn : Assign; + Asgn : Seq_Assign; W : Wire_Id; begin Idx := Arr'First; for I in Alts'Range loop Asgn := Alts (I).Asgns; - while Asgn /= No_Assign loop + while Asgn /= No_Seq_Assign loop W := Get_Wire_Id (Asgn); if Wire_Id_Table.Table (W).Mark_Flag then Arr (Idx) := W; |