diff options
Diffstat (limited to 'sem_stmts.adb')
-rw-r--r-- | sem_stmts.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/sem_stmts.adb b/sem_stmts.adb index 4357065d1..14fabde95 100644 --- a/sem_stmts.adb +++ b/sem_stmts.adb @@ -756,6 +756,7 @@ package body Sem_Stmts is if Expr /= Null_Iir then Expr := Sem_Expression (Expr, String_Type_Definition); Check_Read (Expr); + -- Expr := Eval_Expr_If_Static (Expr); Set_Report_Expression (Stmt, Expr); end if; |