OpenCores
URL https://opencores.org/ocsvn/present/present/trunk

Subversion Repositories present

[/] [present/] [trunk/] [PureTesting/] [bench/] [vhdl/] [ShiftRegTB.vhd] - Diff between revs 8 and 13

Show entire file | Details | Blame | View Log

Rev 8 Rev 13
Line 119... Line 119...
                input <= "10101010";
                input <= "10101010";
                --input <= "1111000011110000111100001111000011110000111100001111000011110000";
                --input <= "1111000011110000111100001111000011110000111100001111000011110000";
      wait for 100 ns;
      wait for 100 ns;
                reset <= '1';
                reset <= '1';
      wait for clk_period*10;
      wait for clk_period*10;
 
 
                reset <= '0';
                reset <= '0';
                en <= '1';
                en <= '1';
                wait for clk_period*1;
                wait for clk_period*1;
 
 
                en <= '0';
                en <= '0';
                wait for clk_period*1;
                wait for clk_period*1;
 
 
 
------------- Test case 1 ------------------------
 
--   expected_output <= x"aa00000000000000";
 
--------------------------------------------------
 
 
 
                if output /= x"aa00000000000000" then
 
                        report "RESULT MISMATCH! Test case 1 failed" severity ERROR;
 
                        assert false severity failure;
 
                else
 
                        report "Test case 1 successful" severity note;
 
                end if;
 
 
                shift <= '1';
                shift <= '1';
                wait for clk_period*10;
                wait for clk_period*10;
 
 
 
------------- Test case 2 ------------------------
 
--   expected_output <= x"002a800000000000";
 
--------------------------------------------------
 
 
 
                if output /= x"002a800000000000" then
 
                        report "RESULT MISMATCH! Test case 2 failed" severity ERROR;
 
                        assert false severity failure;
 
                else
 
                        report "Test case 2 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

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.