diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-04-10 17:30:39 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-04-10 17:30:39 +0200 |
commit | 64288b21f18de4b833cfcb15070024fb664faadb (patch) | |
tree | 8c8230b2ca50bc290a809909a9b568e5757750c6 /src/synth/synth-oper.adb | |
parent | db95e8c9bb4c9881be2fc41e3fb5a42d192728a1 (diff) | |
download | ghdl-64288b21f18de4b833cfcb15070024fb664faadb.tar.gz ghdl-64288b21f18de4b833cfcb15070024fb664faadb.tar.bz2 ghdl-64288b21f18de4b833cfcb15070024fb664faadb.zip |
synth-oper: handle srl
Diffstat (limited to 'src/synth/synth-oper.adb')
-rw-r--r-- | src/synth/synth-oper.adb | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/synth/synth-oper.adb b/src/synth/synth-oper.adb index ca9782ed0..82b660933 100644 --- a/src/synth/synth-oper.adb +++ b/src/synth/synth-oper.adb @@ -1295,7 +1295,10 @@ package body Synth.Oper is return Synth_Shift (Id_Asr, Id_None); when Iir_Predefined_Ieee_Numeric_Std_Sll_Uns_Int => - return Synth_Shift (Id_Lsl, Id_None); + return Synth_Shift (Id_Lsl, Id_Lsr); + + when Iir_Predefined_Ieee_Numeric_Std_Srl_Uns_Int => + return Synth_Shift (Id_Lsr, Id_Lsl); when Iir_Predefined_Ieee_1164_Vector_Ror => return Synth_Rotation (Id_Ror); |