summaryrefslogtreecommitdiff
path: root/src/vhdl/iirs.ads
diff options
context:
space:
mode:
Diffstat (limited to 'src/vhdl/iirs.ads')
-rw-r--r--src/vhdl/iirs.ads91
1 files changed, 13 insertions, 78 deletions
diff --git a/src/vhdl/iirs.ads b/src/vhdl/iirs.ads
index 28c1148..90d3157 100644
--- a/src/vhdl/iirs.ads
+++ b/src/vhdl/iirs.ads
@@ -827,8 +827,10 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
+ -- Get/Set_Attribute_Value_Chain (Field4)
+ --
-- The corresponding package declaration.
- -- Get/Set_Package (Field4)
+ -- Get/Set_Package (Field5)
--
-- Get/Set_End_Has_Reserved_Id (Flag8)
--
@@ -884,8 +886,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Generic_Chain (Field6)
--
-- Get/Set_Port_Chain (Field7)
@@ -1014,8 +1014,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Visible_Flag (Flag4)
--
-- Get/Set_Use_Flag (Flag6)
@@ -1035,8 +1033,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Subtype_Indication (Field5)
--
-- Get/Set_Visible_Flag (Flag4)
@@ -1055,8 +1051,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Visible_Flag (Flag4)
--
-- Get/Set_Use_Flag (Flag6)
@@ -1071,8 +1065,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Visible_Flag (Flag4)
--
-- Get/Set_Use_Flag (Flag6)
@@ -1096,8 +1088,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Subtype_Indication (Field5)
--
-- Must always be null_iir for iir_kind_interface_file_declaration.
@@ -1203,8 +1193,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Interface_Declaration_Chain (Field5)
--
-- Get/Set_Generic_Chain (Field6)
@@ -1278,10 +1266,12 @@ package Iirs is
--
-- Get/Set_Impure_Depth (Field3)
--
- -- Get/Set_Subprogram_Specification (Field4)
+ -- Get/Set_Attribute_Value_Chain (Field4)
--
-- Get/Set_Sequential_Statement_Chain (Field5)
--
+ -- Get/Set_Subprogram_Specification (Field6)
+ --
-- Get/Set_Callees_List (Field7)
--
-- Get/Set_End_Has_Reserved_Id (Flag8)
@@ -1307,8 +1297,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Interface_Declaration_Chain (Field5)
--
-- Get/Set_Generic_Chain (Field6)
@@ -1346,8 +1334,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Subtype_Indication (Field5)
--
-- Get/Set_Default_Value (Field6)
@@ -1388,8 +1374,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Guard_Sensitivity_List (Field6)
--
-- Get/Set_Block_Statement (Field7)
@@ -1417,8 +1401,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- For iterator, this is the reconstructed subtype indication.
-- Get/Set_Subtype_Indication (Field5)
--
@@ -1468,8 +1450,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Subtype_Indication (Field5)
--
-- Get/Set_Default_Value (Field6)
@@ -1514,8 +1494,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Subtype_Indication (Field5)
--
-- Get/Set_File_Logical_Name (Field6)
@@ -1636,8 +1614,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Group_Template_Name (Field5)
--
-- Get/Set_Visible_Flag (Flag4)
@@ -1688,8 +1664,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Default_Value (Field6)
--
-- Get/Set_Visible_Flag (Flag4)
@@ -1711,8 +1685,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Default_Value (Field6)
--
-- Get/Set_Tolerance (Field7)
@@ -1811,6 +1783,8 @@ package Iirs is
-- same; in other words, there may be severals literals with the same
-- value.
--
+ -- The parent of an enumeration_literal is the same parent as the type
+ -- declaration.
-- Get/Set_Parent (Field0)
--
-- Get/Set_Type (Field1)
@@ -1820,8 +1794,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- The declaration of the literal. If LITERAL_ORIGIN is not set, then this
-- is the node itself, else this is the literal defined.
-- Get/Set_Enumeration_Decl (Field6)
@@ -1874,6 +1846,8 @@ package Iirs is
--
-- physical_literal ::= [ abstract_literal ] /unit/_name
--
+ -- The parent of a physical unit is the same parent as the type
+ -- declaration.
-- Get/Set_Parent (Field0)
--
-- Get/Set_Type (Field1)
@@ -1882,8 +1856,6 @@ package Iirs is
--
-- Get/Set_Identifier (Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- The Physical_Literal is the expression that appear in the sources, so
-- this is Null_Iir for a primary unit.
-- Get/Set_Physical_Literal (Field6)
@@ -2368,8 +2340,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Only for Iir_Kind_Concurrent_Selected_Signal_Assignment:
-- Get/Set_Expression (Field5)
--
@@ -2452,8 +2422,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Severity_Expression (Field5)
--
-- Get/Set_Report_Expression (Field6)
@@ -2485,8 +2453,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Severity_Expression (Field5)
--
-- Get/Set_Report_Expression (Field6)
@@ -2523,8 +2489,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Default_Binding_Indication (Field5)
--
-- Get/Set_Generic_Map_Aspect_Chain (Field8)
@@ -2617,8 +2581,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Simultaneous_Left (Field5)
--
-- Get/Set_Simultaneous_Right (Field6)
@@ -2649,9 +2611,6 @@ package Iirs is
-- Only for Iir_Kind_If_Statement:
-- Get/Set_Identifier (Alias Field3)
--
- -- Only for Iir_Kind_If_Statement:
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Sequential_Statement_Chain (Field5)
--
-- Must be an Iir_kind_elsif node, or NULL for no more elsif clauses.
@@ -2689,8 +2648,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Sequential_Statement_Chain (Field5)
--
-- Get/Set_Visible_Flag (Flag4)
@@ -2710,8 +2667,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Sequential_Statement_Chain (Field5)
--
-- Get/Set_Visible_Flag (Flag4)
@@ -2740,8 +2695,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Loop_Label (Field5)
--
-- Get/Set_Visible_Flag (Flag4)
@@ -2757,8 +2710,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- The waveform.
-- If the waveform_chain is null_iir, then the signal assignment is a
-- disconnection statement, ie TARGET <= null_iir after disconection_time,
@@ -2785,8 +2736,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Expression (Field5)
--
-- Get/Set_Visible_Flag (Flag4)
@@ -2802,8 +2751,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Severity_Expression (Field5)
--
-- Get/Set_Report_Expression (Field6)
@@ -2819,8 +2766,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Severity_Expression (Field5)
--
-- Get/Set_Report_Expression (Field6)
@@ -2838,8 +2783,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Condition_Clause (Field5)
--
-- Get/Set_Sensitivity_List (Field6)
@@ -2859,8 +2802,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Expression (Field5)
--
-- Get/Set_Visible_Flag (Flag4)
@@ -2877,8 +2818,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Expression (Field5)
--
-- Get/Set_Visible_Flag (Flag4)
@@ -2897,8 +2836,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Only for Iir_Kind_Concurrent_Procedure_Call_Statement:
-- Get/Set_Postponed_Flag (Flag3)
--
@@ -2924,8 +2861,6 @@ package Iirs is
-- Get/Set_Label (Field3)
-- Get/Set_Identifier (Alias Field3)
--
- -- Get/Set_Attribute_Value_Chain (Field4)
- --
-- Get/Set_Visible_Flag (Flag4)
----------------
@@ -5302,7 +5237,7 @@ package Iirs is
function Get_Configuration_Item_Chain (Target : Iir) return Iir;
procedure Set_Configuration_Item_Chain (Target : Iir; Chain : Iir);
- -- Chain of attribute values for a named entity.
+ -- Chain of attribute values for declared items.
-- To be used with Get/Set_Chain.
-- There is no order, therefore, a new attribute value may be always
-- prepended.
@@ -5328,7 +5263,7 @@ package Iirs is
procedure Set_Entity_Name (Arch : Iir; Entity : Iir);
-- The package declaration corresponding to the body.
- -- Field: Field4 Ref
+ -- Field: Field5 Ref
function Get_Package (Package_Body : Iir) return Iir;
procedure Set_Package (Package_Body : Iir; Decl : Iir);
@@ -5414,7 +5349,7 @@ package Iirs is
procedure Set_Interface_Declaration_Chain (Target : Iir; Chain : Iir);
pragma Inline (Get_Interface_Declaration_Chain);
- -- Field: Field4 Ref
+ -- Field: Field6 Ref
function Get_Subprogram_Specification (Target : Iir) return Iir;
procedure Set_Subprogram_Specification (Target : Iir; Spec : Iir);
generated by cgit (git 2.34.1) at 2025-02-25 18:23:06 +0000