diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-07-16 12:07:34 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-07-18 19:19:58 +0200 |
commit | a889a32c0eb359bbb8b3d941226b1129106e5510 (patch) | |
tree | f01ea0f157b499391fa3bf1adee3f6ab646462c5 /src/vhdl/translate/trans-chap8.adb | |
parent | 1850acf59aa47419c79736ab77e17918b4677faf (diff) | |
download | ghdl-a889a32c0eb359bbb8b3d941226b1129106e5510.tar.gz ghdl-a889a32c0eb359bbb8b3d941226b1129106e5510.tar.bz2 ghdl-a889a32c0eb359bbb8b3d941226b1129106e5510.zip |
vhdl/translate: clarify meaning of Mstate_E for Mnode.
Split into Mstate_Ev (for values) and Mstate_Ep (for pointers).
Also fix stabilize calls for Ev.
Diffstat (limited to 'src/vhdl/translate/trans-chap8.adb')
-rw-r--r-- | src/vhdl/translate/trans-chap8.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/vhdl/translate/trans-chap8.adb b/src/vhdl/translate/trans-chap8.adb index 7283b9bd0..0b9dbce3b 100644 --- a/src/vhdl/translate/trans-chap8.adb +++ b/src/vhdl/translate/trans-chap8.adb @@ -4660,7 +4660,7 @@ package body Trans.Chap8 is else Translate_Waveform_Expression (Value, Target_Type, Var_Targ, Val); - Stabilize (Val); + Val := Stabilize (Val, True); Chap3.Check_Composite_Match (Target_Type, Var_Targ, Get_Type (Value), Val, We); end if; |