aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/vhdl-nodes.ads
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2022-06-12 06:08:27 +0200
committerTristan Gingold <tgingold@free.fr>2022-06-12 06:08:27 +0200
commit4dc88dabe739571c3a8e5136fe7c97f8cc7c0bf3 (patch)
treef007b3dcc4611a1959f3e4f9d63ece1b06b58f95 /src/vhdl/vhdl-nodes.ads
parentad930baf9525e4dddc1e4bd24435ba3fa8bd4625 (diff)
downloadghdl-4dc88dabe739571c3a8e5136fe7c97f8cc7c0bf3.tar.gz
ghdl-4dc88dabe739571c3a8e5136fe7c97f8cc7c0bf3.tar.bz2
ghdl-4dc88dabe739571c3a8e5136fe7c97f8cc7c0bf3.zip
vhdl-nodes: add Inertial_Flag for association_element_by_expression
Diffstat (limited to 'src/vhdl/vhdl-nodes.ads')
-rw-r--r--src/vhdl/vhdl-nodes.ads9
1 files changed, 9 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-nodes.ads b/src/vhdl/vhdl-nodes.ads
index c1868bfc7..333dcf6c8 100644
--- a/src/vhdl/vhdl-nodes.ads
+++ b/src/vhdl/vhdl-nodes.ads
@@ -485,6 +485,10 @@ package Vhdl.Nodes is
--
-- Get/Set_In_Formal_Flag (Flag4)
--
+ -- Only for Iir_Kind_Association_Element_By_Expression:
+ -- True for inertial associations (even without the inertial word).
+ -- Get/Set_Inertial_Flag (Flag5)
+ --
-- Only for Iir_Kind_Association_Element_By_Individual:
-- Must be Locally unless there is an error on one choice.
-- Get/Set_Choice_Staticness (State1)
@@ -9083,6 +9087,11 @@ package Vhdl.Nodes is
function Get_In_Formal_Flag (Name : Iir) return Boolean;
procedure Set_In_Formal_Flag (Name : Iir; Flag : Boolean);
+ -- True iff the association is an internal association.
+ -- Field: Flag5
+ function Get_Inertial_Flag (Name : Iir) return Boolean;
+ procedure Set_Inertial_Flag (Name : Iir; Flag : Boolean);
+
-- The subtype of a slice. Contrary to the Type field, this is not a
-- reference.
-- Field: Field3