From 64288b21f18de4b833cfcb15070024fb664faadb Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Fri, 10 Apr 2020 17:30:39 +0200 Subject: synth-oper: handle srl --- src/synth/synth-oper.adb | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'src') 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); -- cgit v1.2.3