entity testbench is
end entity;
architecture sim of testbench is
signal CountUp : integer :=0;
signal CountDown : integer := 10;
begin
process is
begin
CountUp <= CountUp +1;
CountDown <= CountDown -1;
wait for 10ns;
end process;
process is
begin
wait on CountUp,CountDown;
report "CountUp=" & integer'image(CountUp) &
"CountDown=" & integer'image (CountDown);
end process;
process is
begin
wait until CountUp = CountDown;
report "Jackpot!";
end process;
end architecture;
end entity;
architecture sim of testbench is
signal CountUp : integer :=0;
signal CountDown : integer := 10;
begin
process is
begin
CountUp <= CountUp +1;
CountDown <= CountDown -1;
wait for 10ns;
end process;
process is
begin
wait on CountUp,CountDown;
report "CountUp=" & integer'image(CountUp) &
"CountDown=" & integer'image (CountDown);
end process;
process is
begin
wait until CountUp = CountDown;
report "Jackpot!";
end process;
end architecture;
Comments
Post a Comment