diff options
author | Tristan Gingold <tgingold@free.fr> | 2022-08-10 16:53:11 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2022-08-10 16:53:11 +0200 |
commit | aabb982856fed89ebb696127803577fcec036508 (patch) | |
tree | 69f2803b38b611701e1d26cf2ef2583e1256e554 /src/vhdl/vhdl-nodes.ads | |
parent | cb3e7b0f954f91c7a1d4702006b18d0041d6eb0d (diff) | |
download | ghdl-aabb982856fed89ebb696127803577fcec036508.tar.gz ghdl-aabb982856fed89ebb696127803577fcec036508.tar.bz2 ghdl-aabb982856fed89ebb696127803577fcec036508.zip |
vhdl: add Determined_Aggregate_Flag field. For #2166
Diffstat (limited to 'src/vhdl/vhdl-nodes.ads')
-rw-r--r-- | src/vhdl/vhdl-nodes.ads | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-nodes.ads b/src/vhdl/vhdl-nodes.ads index 16907b607..f352542a1 100644 --- a/src/vhdl/vhdl-nodes.ads +++ b/src/vhdl/vhdl-nodes.ads @@ -4248,6 +4248,8 @@ package Vhdl.Nodes is -- If true, the aggregate can be statically built. This is an optimization -- and the conditions are defined in sem_expr. -- Get/Set_Aggregate_Expand_Flag (Flag1) + -- + -- Get/Set_Determined_Aggregate_Flag (Flag2) -- Iir_Kind_Aggregate_Info (Short) -- @@ -9263,6 +9265,11 @@ package Vhdl.Nodes is function Get_Aggregate_Expand_Flag (Aggr : Iir) return Boolean; procedure Set_Aggregate_Expand_Flag (Aggr : Iir; Flag : Boolean); + -- True if the bounds of the aggregated are determined by the context. + -- Field: Flag2 + function Get_Determined_Aggregate_Flag (Aggr : Iir) return Boolean; + procedure Set_Determined_Aggregate_Flag (Aggr : Iir; Flag : Boolean); + -- Chain of choices. -- Field: Field4 Chain function Get_Association_Choices_Chain (Target : Iir) return Iir; |