aboutsummaryrefslogtreecommitdiffstats
path: root/src/vhdl/translate/trans-chap8.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2020-08-25 20:21:05 +0200
committerTristan Gingold <tgingold@free.fr>2020-08-26 04:48:18 +0200
commit2559d822bce164556652e616611a93590fd241c6 (patch)
tree7a75234bdff3bd16f1c094701c23b89251ddff1c /src/vhdl/translate/trans-chap8.adb
parent870104dd233bae832c628fce15da0e99d26289cb (diff)
downloadghdl-2559d822bce164556652e616611a93590fd241c6.tar.gz
ghdl-2559d822bce164556652e616611a93590fd241c6.tar.bz2
ghdl-2559d822bce164556652e616611a93590fd241c6.zip
vhdl/translate: handle vhdl-93 'last_value. Fix #1440
Diffstat (limited to 'src/vhdl/translate/trans-chap8.adb')
-rw-r--r--src/vhdl/translate/trans-chap8.adb10
1 files changed, 5 insertions, 5 deletions
diff --git a/src/vhdl/translate/trans-chap8.adb b/src/vhdl/translate/trans-chap8.adb
index 345081b43..8ba63234d 100644
--- a/src/vhdl/translate/trans-chap8.adb
+++ b/src/vhdl/translate/trans-chap8.adb
@@ -4377,11 +4377,11 @@ package body Trans.Chap8 is
-- with weird resolution functions.
New_Assign_Stmt
(New_Obj (Cond),
- New_Compare_Op (ON_Neq,
- Chap7.Translate_Signal_Driving_Value
- (M2E (Targ_Sig), Targ_Type),
- M2E (Drv),
- Ghdl_Bool_Type));
+ New_Compare_Op
+ (ON_Neq,
+ M2E (Chap7.Translate_Signal_Driving_Value (Targ_Sig, Targ_Type)),
+ M2E (Drv),
+ Ghdl_Bool_Type));
Finish_If_Stmt (If_Blk);
-- Put signal into active list (if not already in the list).