aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/iirs.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/iirs.ads')
-rw-r--r--src/vhdl/iirs.ads8
1 files changed, 8 insertions, 0 deletions
diff --git a/src/vhdl/iirs.ads b/src/vhdl/iirs.ads
index f0ab7ff3d..70072f6e4 100644
--- a/src/vhdl/iirs.ads
+++ b/src/vhdl/iirs.ads
@@ -3108,6 +3108,10 @@ package Iirs is
-- expression or the subtype)
-- Get/Set_Allocator_Designated_Type (Field2)
--
+ -- Only for Iir_Kind_Allocator_By_Subtype:
+ -- Same as subtype indication but set to own the subtype.
+ -- Get/Set_Allocator_Subtype (Field3)
+ --
-- Only for Iir_Kind_Allocator_By_Expression:
-- Contains the expression for a by expression allocator.
-- Get/Set_Expression (Field5)
@@ -5243,6 +5247,10 @@ package Iirs is
function Get_Literal_Subtype (Lit : Iir) return Iir;
procedure Set_Literal_Subtype (Lit : Iir; Atype : Iir);
+ -- Field: Field3
+ function Get_Allocator_Subtype (Lit : Iir) return Iir;
+ procedure Set_Allocator_Subtype (Lit : Iir; Atype : Iir);
+
-- Field: Field3 (uc)
function Get_Entity_Class (Target : Iir) return Token_Type;
procedure Set_Entity_Class (Target : Iir; Kind : Token_Type);