aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/translate/trans-chap8.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2020-07-16 12:07:34 +0200
committerTristan Gingold <tgingold@free.fr>2020-07-18 19:19:58 +0200
commita889a32c0eb359bbb8b3d941226b1129106e5510 (patch)
treef01ea0f157b499391fa3bf1adee3f6ab646462c5 /src/vhdl/translate/trans-chap8.adb
parent1850acf59aa47419c79736ab77e17918b4677faf (diff)
downloadghdl-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.adb2
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;