URL
https://opencores.org/ocsvn/present/present/trunk
Show entire file |
Details |
Blame |
View Log
Rev 7 |
Rev 11 |
Line 87... |
Line 87... |
wait for clk_period/2;
|
wait for clk_period/2;
|
clk <= '1';
|
clk <= '1';
|
wait for clk_period/2;
|
wait for clk_period/2;
|
end process;
|
end process;
|
|
|
|
|
-- Stimulus process
|
-- Stimulus process
|
stim_proc: process
|
stim_proc: process
|
begin
|
begin
|
-- hold reset state for 100ms.
|
-- hold reset state for 100ms.
|
reset <= '1';
|
reset <= '1';
|
wait for 100ns;
|
wait for 100ns;
|
reset <= '0';
|
reset <= '0';
|
wait for clk_period;
|
wait for clk_period;
|
|
|
|
------------- Test case 1 ------------------------
|
|
-- input <= x"0";
|
|
-- expected_output <= x"5";
|
|
--------------------------------------------------
|
|
|
input <= x"0";
|
input <= x"0";
|
wait for clk_period;
|
wait for clk_period;
|
|
|
|
if output /= x"5" then
|
|
report "RESULT MISMATCH! Test case 1 failed" severity ERROR;
|
|
assert false severity failure;
|
|
else
|
|
report "Test case 1 successful" severity note;
|
|
end if;
|
|
|
|
------------- Test case 2 ------------------------
|
|
-- input <= x"A";
|
|
-- expected_output <= x"6";
|
|
--------------------------------------------------
|
|
|
input <= x"A";
|
input <= x"A";
|
wait for clk_period;
|
wait for clk_period;
|
|
|
|
if output /= x"6" then
|
|
report "RESULT MISMATCH! Test case 2 failed" severity ERROR;
|
|
assert false severity failure;
|
|
else
|
|
report "Test case 2 successful" severity note;
|
|
end if;
|
|
|
|
------------- Test case 3 ------------------------
|
|
-- input <= x"F";
|
|
-- expected_output <= x"A";
|
|
--------------------------------------------------
|
|
|
input <= x"F";
|
input <= x"F";
|
wait for clk_period;
|
wait for clk_period;
|
-- insert stimulus here
|
|
|
if output /= x"A" then
|
|
report "RESULT MISMATCH! Test case 3 failed" severity ERROR;
|
|
assert false severity failure;
|
|
else
|
|
report "Test case 3 successful" severity note;
|
|
end if;
|
|
|
assert false severity failure;
|
assert false severity failure;
|
end process;
|
end process;
|
|
|
END;
|
END;
|
No newline at end of file
|
No newline at end of file
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.