diff options
| author | gingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7> | 2005-12-10 17:11:30 +0000 |
|---|---|---|
| committer | gingold <gingold@b72b5c32-5f01-0410-b925-b5c7b92870f7> | 2005-12-10 17:11:30 +0000 |
| commit | 4339f4ca9ed9fe2c58d390e7738a5d2ee7d43545 (patch) | |
| tree | 8b49a281d46328ce06b5f45d8dea275f36feec55 /sem_stmts.adb | |
| parent | 1716b52525c5b6baaba7e0a16d6d9dbf6633ac6d (diff) | |
| download | ghdl-4339f4ca9ed9fe2c58d390e7738a5d2ee7d43545.tar.gz ghdl-4339f4ca9ed9fe2c58d390e7738a5d2ee7d43545.tar.bz2 ghdl-4339f4ca9ed9fe2c58d390e7738a5d2ee7d43545.zip | |
bug fixes
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; |