aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-vhdl_expr.adb
diff options
context:
space:
mode:
Diffstat (limited to 'src/synth/synth-vhdl_expr.adb')
-rw-r--r--src/synth/synth-vhdl_expr.adb7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/synth/synth-vhdl_expr.adb b/src/synth/synth-vhdl_expr.adb
index 6b7672ae2..26555ff4d 100644
--- a/src/synth/synth-vhdl_expr.adb
+++ b/src/synth/synth-vhdl_expr.adb
@@ -2231,8 +2231,11 @@ package body Synth.Vhdl_Expr is
| Iir_Kind_Low_Array_Attribute
| Iir_Kind_Indexed_Name
| Iir_Kind_Integer_Literal =>
- -- The type of this attribute is the type of the index, which is
- -- not synthesized as a type (only as an index).
+ -- For array attributes: the type is the type of the index, which
+ -- is not synthesized as a type (only as an index).
+ --
+ -- Likewise for indexed names.
+ --
-- For integer_literal, the type is not really needed, and it
-- may be created by static evaluation of an array attribute.
Etype := Get_Base_Type (Etype);