Subversion Repositories wdsp

library ieee;

use ieee.std_logic_1164.all;

use ieee.numeric_std.all;

entity Barrel_Shifter_left is

generic (

        WordWidth_in:integer:=20;--width signal of in

        WordWidth_out:integer:=32;--width signal of out

        WordWidth_Q:integer:=4--width signal of Q

);

port(

signal_input :in std_logic_vector(WordWidth_in-1 downto 0);

signal_out :out std_logic_vector(WordWidth_out-1 downto 0);

Q :in std_logic_vector(WordWidth_Q-1 downto 0)

);

end entity;

architecture RTL of Barrel_Shifter_left is

signal signal_aux: std_logic_vector(WordWidth_out-1 downto 0);

signal signal_aux_input: std_logic_vector(WordWidth_out-1 downto 0);

signal sext: std_logic_vector(WordWidth_out-WordWidth_in-1 downto 0);

begin

sext<= (others=>signal_input(WordWidth_in-1));

signal_aux_input<= sext & signal_input;

--signal_aux<=std_logic_vector(signed(signal_input)*to_signed(2**(to_integer(-signed(Q))),24));

signal_aux<=to_stdlogicvector(to_bitvector(signal_aux_input) sll to_integer(unsigned(Q)));

--signal_aux<=std_logic_vector(signed(signal_input) ror (to_integer(unsigned(Q))));

signal_out<=signal_aux;

end architecture;