aboutsummaryrefslogtreecommitdiffstats
path: root/src/simul/simul-vhdl_simul.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/simul/simul-vhdl_simul.ads')
-rw-r--r--src/simul/simul-vhdl_simul.ads16
1 files changed, 16 insertions, 0 deletions
diff --git a/src/simul/simul-vhdl_simul.ads b/src/simul/simul-vhdl_simul.ads
index 05d4af757..5a24f6dc1 100644
--- a/src/simul/simul-vhdl_simul.ads
+++ b/src/simul/simul-vhdl_simul.ads
@@ -94,6 +94,22 @@ package Simul.Vhdl_Simul is
Table_Low_Bound => No_Scalar_Quantity + 1,
Table_Initial => 128);
+ type Contrib_Index_Type is new Uns32;
+
+ type Scalar_Terminal_Record is record
+ -- Index in Y vector
+ Ref_Idx : Integer;
+ -- Number of contributions.
+ Nbr_Contrib : Natural;
+ First_Contrib : Contrib_Index_Type;
+ end record;
+
+ package Scalar_Terminals_Table is new Tables
+ (Table_Component_Type => Scalar_Terminal_Record,
+ Table_Index_Type => Scalar_Terminal_Index,
+ Table_Low_Bound => No_Scalar_Terminal + 1,
+ Table_Initial => 64);
+
type Augmentation_Kind is
(
Aug_Noise,