diff options
| author | Tristan Gingold <tgingold@free.fr> | 2021-02-21 21:37:25 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2021-02-21 21:37:25 +0100 |
| commit | 55ee38da4231f0a290d33ea71f2589ab59ed4c47 (patch) | |
| tree | 5a60ced6e036e94e284b11623489058070b7313f /src | |
| parent | db5d662a76ad288336af9832ec7765a9bba16ce0 (diff) | |
| download | ghdl-55ee38da4231f0a290d33ea71f2589ab59ed4c47.tar.gz ghdl-55ee38da4231f0a290d33ea71f2589ab59ed4c47.tar.bz2 ghdl-55ee38da4231f0a290d33ea71f2589ab59ed4c47.zip | |
synth-stmts: handle attributes in block and generate statements. Fix #1658
Diffstat (limited to 'src')
| -rw-r--r-- | src/synth/synth-stmts.adb | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/synth/synth-stmts.adb b/src/synth/synth-stmts.adb index 3bb0003f8..a19ca987a 100644 --- a/src/synth/synth-stmts.adb +++ b/src/synth/synth-stmts.adb @@ -3170,6 +3170,9 @@ package body Synth.Stmts is Synth_Declarations (Blk_Inst, Get_Declaration_Chain (Blk)); Synth_Concurrent_Statements (Blk_Inst, Get_Concurrent_Statement_Chain (Blk)); + + Synth_Attribute_Values (Blk_Inst, Blk); + Finalize_Declarations (Blk_Inst, Get_Declaration_Chain (Blk)); Free_Instance (Blk_Inst); @@ -3444,6 +3447,8 @@ package body Synth.Stmts is Synth_Concurrent_Statements (Bod_Inst, Get_Concurrent_Statement_Chain (Bod)); + Synth_Attribute_Values (Bod_Inst, Bod); + Finalize_Declarations (Bod_Inst, Decls_Chain); Free_Instance (Bod_Inst); |