diff options
Diffstat (limited to 'src/vhdl/vhdl-nodes.ads')
-rw-r--r-- | src/vhdl/vhdl-nodes.ads | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-nodes.ads b/src/vhdl/vhdl-nodes.ads index f092fd598..93ea74f11 100644 --- a/src/vhdl/vhdl-nodes.ads +++ b/src/vhdl/vhdl-nodes.ads @@ -2970,7 +2970,16 @@ package Vhdl.Nodes is -- -- Get/Set_Has_Signal_Flag (Flag3) -- + -- True if the indexes are constrained (either by this definition or by + -- a parent). -- Get/Set_Index_Constraint_Flag (Flag4) + -- + -- If True, an array constraint is lexically present (at least for the + -- index). This can be an index constraint or 'open'. + -- Get/Set_Has_Array_Constraint_Flag (Flag5) + -- + -- If True, an element constraint is lexically present. It can be 'open'. + -- Get/Set_Has_Element_Constraint_Flag (Flag6) -- Iir_Kind_Range_Expression (Short) -- @@ -8270,6 +8279,14 @@ package Vhdl.Nodes is function Get_Array_Element_Constraint (Def : Iir) return Iir; procedure Set_Array_Element_Constraint (Def : Iir; El : Iir); + -- Field: Flag5 + function Get_Has_Array_Constraint_Flag (Def : Iir) return Boolean; + procedure Set_Has_Array_Constraint_Flag (Def : Iir; Flag : Boolean); + + -- Field: Flag6 + function Get_Has_Element_Constraint_Flag (Def : Iir) return Boolean; + procedure Set_Has_Element_Constraint_Flag (Def : Iir; Flag : Boolean); + -- List of elements of a record. -- For a record_type_definition: Is_Ref is false, as the elements -- declaration are owned by the type definition. |