diff options
author | Tristan Gingold | 2016-01-24 05:14:35 +0100 |
---|---|---|
committer | Tristan Gingold | 2016-01-24 05:14:35 +0100 |
commit | c03fc9f45df59e35ba9fba8bcf9e933fbb1074b9 (patch) | |
tree | 67f83680a6544012cc5755068f43a1089d0d8d53 /src/vhdl/sem_expr.adb | |
parent | a4de40e69bbc961554e432f08fc146e07091c3f7 (diff) | |
download | ghdl-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.adb | 1 |
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 |