summaryrefslogtreecommitdiff
path: root/src/vhdl/sem_expr.adb
diff options
context:
space:
mode:
authorTristan Gingold2016-01-24 05:14:35 +0100
committerTristan Gingold2016-01-24 05:14:35 +0100
commitc03fc9f45df59e35ba9fba8bcf9e933fbb1074b9 (patch)
tree67f83680a6544012cc5755068f43a1089d0d8d53 /src/vhdl/sem_expr.adb
parenta4de40e69bbc961554e432f08fc146e07091c3f7 (diff)
downloadghdl-c03fc9f45df59e35ba9fba8bcf9e933fbb1074b9.tar.gz
ghdl-c03fc9f45df59e35ba9fba8bcf9e933fbb1074b9.tar.bz2
ghdl-c03fc9f45df59e35ba9fba8bcf9e933fbb1074b9.zip
simul: fix various issues.
Diffstat (limited to 'src/vhdl/sem_expr.adb')
-rw-r--r--src/vhdl/sem_expr.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/sem_expr.adb b/src/vhdl/sem_expr.adb
index 5568905..88150b7 100644
--- a/src/vhdl/sem_expr.adb
+++ b/src/vhdl/sem_expr.adb
@@ -3319,6 +3319,7 @@ package body Sem_Expr is
(Info.Index_Subtype, Index_Subtype_Constraint);
Set_Type_Staticness (Info.Index_Subtype, Choice_Staticness);
Set_Expr_Staticness (Index_Subtype_Constraint, Choice_Staticness);
+ Set_Type (Index_Subtype_Constraint, Index_Type);
-- LRM93 7.3.2.2
-- For an aggregate that has named associations, the leftmost and