diff options
| -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"); |