DelayWithCarry.vhd

Go to the documentation of this file.

 
--the delay generic
 
library IEEE;
use IEEE.STD_LOGIC_1164.all;
use IEEE.NUMERIC_STD.all;
 
library work;
use work.DataTypes.all;
 
entity DelayWithCarry is
  generic (delay : integer := 1
           );
 
  port (
    CLK      : in  std_logic;
    IN_Word  : in  DataWordWithCarry;
    OUT_Word : out DataWordWithCarry
    );
end DelayWithCarry;
 
architecture Behavioral of DelayWithCarry is
 
  signal DelayedWord : DataWordsWithCarry(delay downto 0) := (others => (others => '0'));
 
begin
 
  DelayedWord(DelayedWord'high)            <= IN_Word;
 
  dalay_proc : process (CLK)
  begin
    if rising_edge(CLK) then
      DelayedWord(DelayedWord'high-1 downto 0) <= DelayedWord(DelayedWord'high downto 1);
    end if;
  end process;
 
  OUT_Word <= DelayedWord(0);
end Behavioral;