aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/simulate/simul-environments.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/simulate/simul-environments.ads')
-rw-r--r--src/vhdl/simulate/simul-environments.ads5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/vhdl/simulate/simul-environments.ads b/src/vhdl/simulate/simul-environments.ads
index 5369c477a..be20e402a 100644
--- a/src/vhdl/simulate/simul-environments.ads
+++ b/src/vhdl/simulate/simul-environments.ads
@@ -214,6 +214,10 @@ package Simul.Environments is
end record;
type Object_Slot_Type is new Natural;
+
+ -- This slot is not used.
+ Invalid_Object_Slot : constant Object_Slot_Type := 0;
+
subtype Parameter_Slot_Type is Object_Slot_Type range 0 .. 2**15;
type Pkg_Index_Type is new Natural;
@@ -308,6 +312,7 @@ package Simul.Environments is
-- Useful informations for a dynamic block (ie, a frame).
-- The scope level and an access to the block of upper scope level.
Block_Scope : Sim_Info_Acc;
+ Uninst_Scope : Sim_Info_Acc;
Up_Block : Block_Instance_Acc;
-- Block, architecture, package, process, component instantiation for