diff options
Diffstat (limited to 'sem_expr.adb')
| -rw-r--r-- | sem_expr.adb | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/sem_expr.adb b/sem_expr.adb index 2293e0a38..f008a7bbc 100644 --- a/sem_expr.adb +++ b/sem_expr.adb @@ -189,6 +189,8 @@ package body Sem_Expr is | Iir_Kind_Allocator_By_Subtype | Iir_Kind_Qualified_Expression => return Expr; + when Iir_Kinds_Quantity_Declaration => + return Expr; when Iir_Kinds_Dyadic_Operator | Iir_Kinds_Monadic_Operator => return Expr; @@ -683,7 +685,6 @@ package body Sem_Expr is end if; end Get_Discrete_Range_Staticness; - procedure Set_Function_Call_Staticness (Expr : Iir; Imp : Iir) is Staticness : Iir_Staticness; @@ -3479,6 +3480,8 @@ package body Sem_Expr is | Iir_Kind_Iterator_Declaration | Iir_Kind_Guard_Signal_Declaration => return; + when Iir_Kinds_Quantity_Declaration => + return; when Iir_Kind_File_Declaration | Iir_Kind_File_Interface_Declaration => -- LRM 4.3.2 Interface declarations |