diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-09-21 07:53:23 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-09-21 07:53:23 +0200 |
| commit | 98d13c051f8c87b69a07c34c836ed31e8ee58842 (patch) | |
| tree | 38de0a9decaf4729f5c00bc95f31dcc486faf42a /src | |
| parent | a039d22a3cfeebb5bcda0be4244a1d0d507d30e2 (diff) | |
| download | ghdl-98d13c051f8c87b69a07c34c836ed31e8ee58842.tar.gz ghdl-98d13c051f8c87b69a07c34c836ed31e8ee58842.tar.bz2 ghdl-98d13c051f8c87b69a07c34c836ed31e8ee58842.zip | |
vhdl-sem_types: fix staticness of 'open' array constraint. Fix #1469
Diffstat (limited to 'src')
| -rw-r--r-- | src/vhdl/vhdl-sem_types.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/vhdl-sem_types.adb b/src/vhdl/vhdl-sem_types.adb index 95f48d71e..d669c170d 100644 --- a/src/vhdl/vhdl-sem_types.adb +++ b/src/vhdl/vhdl-sem_types.adb @@ -1610,6 +1610,7 @@ package body Vhdl.Sem_Types is -- constrained on indexes. Set_Index_Constraint_Flag (Def, Get_Index_Constraint_Flag (Mark_Def)); Set_Index_Subtype_List (Def, Get_Index_Subtype_List (Mark_Def)); + Index_Staticness := Get_Type_Staticness (Mark_Def); else if Get_Index_Constraint_Flag (Mark_Def) then Error_Msg_Sem (+Def, "constrained array cannot be re-constrained"); |