diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-05-19 05:36:56 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-05-19 06:09:12 +0200 |
commit | b2354de2756c4b51acebcbf90df1c81069d0c7b7 (patch) | |
tree | ecb7cbc3b727fbf8ef63963eaf50c7f7112a3ddc /src/synth/synth-static_oper.adb | |
parent | 88a57f9390b638db0626d185773a50376a256c99 (diff) | |
download | ghdl-b2354de2756c4b51acebcbf90df1c81069d0c7b7.tar.gz ghdl-b2354de2756c4b51acebcbf90df1c81069d0c7b7.tar.bz2 ghdl-b2354de2756c4b51acebcbf90df1c81069d0c7b7.zip |
vhdl-nodes: Rename and move shift/rotate predefined functions. Fix #1325
Diffstat (limited to 'src/synth/synth-static_oper.adb')
-rw-r--r-- | src/synth/synth-static_oper.adb | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/src/synth/synth-static_oper.adb b/src/synth/synth-static_oper.adb index b2c56aa8d..ade651703 100644 --- a/src/synth/synth-static_oper.adb +++ b/src/synth/synth-static_oper.adb @@ -847,19 +847,16 @@ package body Synth.Static_Oper is return Create_Memory_Discrete (Eval_Signed_To_Integer (Get_Memtyp (Param1), Expr), Res_Typ); - when Iir_Predefined_Ieee_Numeric_Std_Shl_Uns_Nat => + when Iir_Predefined_Ieee_Numeric_Std_Shf_Left_Uns_Nat + | Iir_Predefined_Ieee_Numeric_Std_Shf_Left_Sgn_Nat => return Shift_Vec (Get_Memtyp (Param1), Uns32 (Read_Discrete (Param2)), False, False); - when Iir_Predefined_Ieee_Numeric_Std_Shl_Sgn_Nat => - return Shift_Vec - (Get_Memtyp (Param1), Uns32 (Read_Discrete (Param2)), - False, False); - when Iir_Predefined_Ieee_Numeric_Std_Shr_Uns_Nat => + when Iir_Predefined_Ieee_Numeric_Std_Shf_Right_Uns_Nat => return Shift_Vec (Get_Memtyp (Param1), Uns32 (Read_Discrete (Param2)), True, False); - when Iir_Predefined_Ieee_Numeric_Std_Shr_Sgn_Nat => + when Iir_Predefined_Ieee_Numeric_Std_Shf_Right_Sgn_Nat => return Shift_Vec (Get_Memtyp (Param1), Uns32 (Read_Discrete (Param2)), True, True); |