diff options
| -rw-r--r-- | src/synth/netlists-disp_vhdl.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/src/synth/netlists-disp_vhdl.adb b/src/synth/netlists-disp_vhdl.adb index f72defe4f..4681dabec 100644 --- a/src/synth/netlists-disp_vhdl.adb +++ b/src/synth/netlists-disp_vhdl.adb @@ -736,6 +736,10 @@ package body Netlists.Disp_Vhdl is Put ((1 .. Natural (Ow - Iw) => '0')); Disp_Template (""" & \i0; -- uext" & NL, Inst); end; + when Id_Lsr => + Disp_Template + (" \o0 <= std_logic_vector " + & "(shift_right (\ui0, to_integer(\ui1)));" & NL, Inst); when Id_Red_Or => declare Iw : constant Width := Get_Width (Get_Input_Net (Inst, 0)); |