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;