36 lines
905 B
VHDL
36 lines
905 B
VHDL
|
library IEEE;
|
||
|
|
use IEEE.STD_LOGIC_1164.all;
|
||
|
|
use IEEE.NUMERIC_STD.all;
|
||
|
|
|
||
|
|
entity ALUN is
|
||
|
|
generic (N : positive := 8);
|
||
|
|
port
|
||
|
|
(
|
||
|
|
a,b : in std_logic_vector((N-1) downto 0);
|
||
|
|
op : in std_logic_vector(2 downto 0);
|
||
|
|
r, m : out std_logic_vector((N-1) downto 0)
|
||
|
|
);
|
||
|
|
end ALUN;
|
||
|
|
|
||
|
|
architecture Behavioral of ALUN is
|
||
|
|
signal s_a, s_b, s_r : unsigned((N-1) downto 0);
|
||
|
|
signal s_m : unsigned(((N*2)-1) downto 0);
|
||
|
|
begin
|
||
|
|
s_a <= unsigned(a);
|
||
|
|
s_b <= unsigned(b);
|
||
|
|
|
||
|
|
s_m <= s_a * s_b;
|
||
|
|
|
||
|
|
with op select
|
||
|
|
s_r <= s_a + s_b when "000",
|
||
|
|
s_a - s_b when "001",
|
||
|
|
s_m((N-1) downto 0) when "010",
|
||
|
|
s_a / s_b when "011",
|
||
|
|
s_a rem s_b when "100",
|
||
|
|
s_a and s_b when "101",
|
||
|
|
s_a or s_b when "110",
|
||
|
|
s_a xor s_b when "111";
|
||
|
|
|
||
|
|
r <= std_logic_vector(s_r);
|
||
|
|
m <= std_logic_vector(s_m(((N*2)-1) downto N)) when (op = "010") else (others => '0');
|
||
|
|
end Behavioral;
|