diff options
author | Tristan Gingold <tgingold@free.fr> | 2022-06-06 07:25:26 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2022-06-06 07:25:26 +0200 |
commit | c0b6dbfcc55da8cde4ad00782f0b27cd3abba6e6 (patch) | |
tree | 480d55829ead0ec83c54d179672ea18bb314c077 /src/synth/synth-vhdl_eval.adb | |
parent | 60b3a419cfbd279ff4c477cfcab924b646d5c444 (diff) | |
download | ghdl-c0b6dbfcc55da8cde4ad00782f0b27cd3abba6e6.tar.gz ghdl-c0b6dbfcc55da8cde4ad00782f0b27cd3abba6e6.tar.bz2 ghdl-c0b6dbfcc55da8cde4ad00782f0b27cd3abba6e6.zip |
synth-vhdl_eval: recognize and handle to_stdulogicvector
Diffstat (limited to 'src/synth/synth-vhdl_eval.adb')
-rw-r--r-- | src/synth/synth-vhdl_eval.adb | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/src/synth/synth-vhdl_eval.adb b/src/synth/synth-vhdl_eval.adb index 4574fa6f8..89743a5a8 100644 --- a/src/synth/synth-vhdl_eval.adb +++ b/src/synth/synth-vhdl_eval.adb @@ -2102,12 +2102,14 @@ package body Synth.Vhdl_Eval is when Iir_Predefined_Ieee_Numeric_Std_Touns_Nat_Nat_Uns | Iir_Predefined_Ieee_Std_Logic_Arith_Conv_Unsigned_Int - | Iir_Predefined_Ieee_Numeric_Std_Unsigned_To_Slv_Nat_Nat => + | Iir_Predefined_Ieee_Numeric_Std_Unsigned_To_Slv_Nat_Nat + | Iir_Predefined_Ieee_Numeric_Std_Unsigned_To_Suv_Nat_Nat => return Eval_To_Log_Vector (Uns64 (Read_Discrete (Param1)), Read_Discrete (Param2), Res_Typ); when Iir_Predefined_Ieee_Numeric_Std_Touns_Nat_Uns_Uns - | Iir_Predefined_Ieee_Numeric_Std_Unsigned_To_Slv_Nat_Slv => + | Iir_Predefined_Ieee_Numeric_Std_Unsigned_To_Slv_Nat_Slv + | Iir_Predefined_Ieee_Numeric_Std_Unsigned_To_Suv_Nat_Suv => return Eval_To_Log_Vector (Uns64 (Read_Discrete (Param1)), Int64 (Param2.Typ.Abound.Len), Res_Typ); |