diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-08-25 20:21:05 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-08-26 04:48:18 +0200 |
commit | 2559d822bce164556652e616611a93590fd241c6 (patch) | |
tree | 7a75234bdff3bd16f1c094701c23b89251ddff1c /src/vhdl/translate/trans-chap8.adb | |
parent | 870104dd233bae832c628fce15da0e99d26289cb (diff) | |
download | ghdl-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.adb | 10 |
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). |