diff options
| author | Tristan Gingold <tgingold@free.fr> | 2017-01-18 06:21:02 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2017-01-18 06:21:02 +0100 |
| commit | 543513618491e613194ce04cabd9a1ffb69e6cbc (patch) | |
| tree | bef5621b2ea0cb6e9ab3ac160f3fbe52fe8b995f /src/vhdl/translate/trans-chap7.adb | |
| parent | e62ffe5b5463c91ca274b04dcc8c2c950c57fef2 (diff) | |
| download | ghdl-543513618491e613194ce04cabd9a1ffb69e6cbc.tar.gz ghdl-543513618491e613194ce04cabd9a1ffb69e6cbc.tar.bz2 ghdl-543513618491e613194ce04cabd9a1ffb69e6cbc.zip | |
evaluation: handle vector minimum and maximum.
Fix #257
Diffstat (limited to 'src/vhdl/translate/trans-chap7.adb')
| -rw-r--r-- | src/vhdl/translate/trans-chap7.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/vhdl/translate/trans-chap7.adb b/src/vhdl/translate/trans-chap7.adb index 478c76565..c361f0905 100644 --- a/src/vhdl/translate/trans-chap7.adb +++ b/src/vhdl/translate/trans-chap7.adb @@ -2120,10 +2120,10 @@ package body Trans.Chap7 is when Iir_Predefined_Vector_Minimum => return Translate_Predefined_Vector_Min_Max - (True, Left, Res_Type); + (True, Left, Get_Type (Expr)); when Iir_Predefined_Vector_Maximum => return Translate_Predefined_Vector_Min_Max - (False, Left, Res_Type); + (False, Left, Get_Type (Expr)); when Iir_Predefined_Bit_Rising_Edge | Iir_Predefined_Boolean_Rising_Edge => |