diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-07-07 07:40:14 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-07-18 19:19:56 +0200 |
| commit | 05507ab2016c069a195ad86be451b5b33c64df4c (patch) | |
| tree | 8d816d6570e7dc264cb7522a7f8563858e4da327 /src/vhdl/translate/trans-chap8.adb | |
| parent | 99dc7214a56febc9f125f05967f47bbf18593642 (diff) | |
| download | ghdl-05507ab2016c069a195ad86be451b5b33c64df4c.tar.gz ghdl-05507ab2016c069a195ad86be451b5b33c64df4c.tar.bz2 ghdl-05507ab2016c069a195ad86be451b5b33c64df4c.zip | |
trans-chap8: add a stabilize.
Diffstat (limited to 'src/vhdl/translate/trans-chap8.adb')
| -rw-r--r-- | src/vhdl/translate/trans-chap8.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/vhdl/translate/trans-chap8.adb b/src/vhdl/translate/trans-chap8.adb index acda82aff..7283b9bd0 100644 --- a/src/vhdl/translate/trans-chap8.adb +++ b/src/vhdl/translate/trans-chap8.adb @@ -977,6 +977,7 @@ package body Trans.Chap8 is Sub_Aggr := Chap3.Slice_Base (Chap3.Get_Composite_Base (Val), Sub_Type, New_Obj_Value (Index)); + Stabilize (Sub_Aggr); end if; Translate_Variable_Aggregate_Assignment (Expr, Sub_Type, Sub_Aggr); |