aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/simulate
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/simulate')
-rw-r--r--src/vhdl/simulate/annotations.adb6
-rw-r--r--src/vhdl/simulate/annotations.ads2
2 files changed, 4 insertions, 4 deletions
diff --git a/src/vhdl/simulate/annotations.adb b/src/vhdl/simulate/annotations.adb
index 6548236c1..fb193996c 100644
--- a/src/vhdl/simulate/annotations.adb
+++ b/src/vhdl/simulate/annotations.adb
@@ -240,7 +240,7 @@ package body Annotations is
Prot_Info :=
new Sim_Info_Type'(Kind => Kind_Frame,
- Inst_Slot => 0,
+ Inst_Slot => Invalid_Instance_Slot,
Frame_Scope => Current_Scope,
Nbr_Objects => 0,
Nbr_Instances => 0);
@@ -501,7 +501,7 @@ package body Annotations is
Subprg_Info :=
new Sim_Info_Type'(Kind => Kind_Frame,
- Inst_Slot => 0,
+ Inst_Slot => Invalid_Instance_Slot,
Frame_Scope => Current_Scope,
Nbr_Objects => 0,
Nbr_Instances => 0);
@@ -1010,7 +1010,7 @@ package body Annotations is
Package_Info := new Sim_Info_Type'
(Kind => Kind_Block,
- Inst_Slot => Instance_Slot_Type (Nbr_Packages),
+ Inst_Slot => Invalid_Instance_Slot,
Frame_Scope => Current_Scope,
Nbr_Objects => 0,
Nbr_Instances => 0);
diff --git a/src/vhdl/simulate/annotations.ads b/src/vhdl/simulate/annotations.ads
index cb0d94aa5..5d927b54e 100644
--- a/src/vhdl/simulate/annotations.ads
+++ b/src/vhdl/simulate/annotations.ads
@@ -85,7 +85,7 @@ package Annotations is
when Kind_Block
| Kind_Frame
| Kind_Process =>
- -- Slot number.
+ -- Slot number in the parent (for blocks).
Inst_Slot : Instance_Slot_Type;
-- scope level for this frame.