Prüfung - Institut für Kommunikationsnetze und Rechnersysteme ...

syncfifo_process: process(wclk, rclk) is
constant N: natural := 5;
subtype INDEX_RANGE is natural range 0 to N - 1;
type fifo_t is array(INDEX_RANGE) of std_logic_vector(7 downto 0);
variable fifo: fifo_t;
variable rindex, windex: INDEX_RANGE;
begin
w_if: if wclk’event and wclk = ’1’ then
if wena = ’1’ then
fifo(windex) := wdata;
windex := (windex + 1) mod N;
end if;
end if;
r_if: if rclk’event and rclk = ’1’ then
if rena = ’1’ then
rdata