?? tb_pipeline_adder.vhw
字號:
--------------------------------------------------------------------------------
-- Copyright (c) 1995-2003 Xilinx, Inc.
-- All Right Reserved.
--------------------------------------------------------------------------------
-- ____ ____
-- / /\/ /
-- /___/ \ / Vendor: Xilinx
-- \ \ \/ Version : 8.1i
-- \ \ Application : ISE
-- / / Filename : TB_Pipeline_Adder.vhw
-- /___/ /\ Timestamp : Fri May 19 23:30:47 2006
-- \ \ / \
-- \___\/\___\
--
--Command:
--Design Name: TB_Pipeline_Adder
--Device: Xilinx
--
library IEEE;
use IEEE.STD_LOGIC_1164.ALL;
use IEEE.STD_LOGIC_ARITH.ALL;
use IEEE.STD_LOGIC_UNSIGNED.ALL;
USE IEEE.STD_LOGIC_TEXTIO.ALL;
USE STD.TEXTIO.ALL;
ENTITY TB_Pipeline_Adder IS
END TB_Pipeline_Adder;
ARCHITECTURE testbench_arch OF TB_Pipeline_Adder IS
FILE RESULTS: TEXT OPEN WRITE_MODE IS "results.txt";
COMPONENT PipeLine_Adder
PORT (
InputA : In std_logic_vector (2 DownTo 0);
InputB : In std_logic_vector (2 DownTo 0);
Request : In std_logic;
Acknowledge : In std_logic;
Reset : In std_logic;
Carry_In : In std_logic;
Done : Out std_logic;
Output : Out std_logic_vector (3 DownTo 0)
);
END COMPONENT;
SIGNAL InputA : std_logic_vector (2 DownTo 0) := "000";
SIGNAL InputB : std_logic_vector (2 DownTo 0) := "000";
SIGNAL Request : std_logic := '0';
SIGNAL Acknowledge : std_logic := '0';
SIGNAL Reset : std_logic := '1';
SIGNAL Carry_In : std_logic := '0';
SIGNAL Done : std_logic := 'U';
SIGNAL Output : std_logic_vector (3 DownTo 0) := "UUUU";
SHARED VARIABLE TX_ERROR : INTEGER := 0;
SHARED VARIABLE TX_OUT : LINE;
BEGIN
UUT : PipeLine_Adder
PORT MAP (
InputA => InputA,
InputB => InputB,
Request => Request,
Acknowledge => Acknowledge,
Reset => Reset,
Carry_In => Carry_In,
Done => Done,
Output => Output
);
PROCESS
PROCEDURE CHECK_Done(
next_Done : std_logic;
TX_TIME : INTEGER
) IS
VARIABLE TX_STR : String(1 to 4096);
VARIABLE TX_LOC : LINE;
BEGIN
IF (Done /= next_Done) THEN
STD.TEXTIO.write(TX_LOC, string'("Error at time="));
STD.TEXTIO.write(TX_LOC, TX_TIME);
STD.TEXTIO.write(TX_LOC, string'("ns Done="));
IEEE.STD_LOGIC_TEXTIO.write(TX_LOC, Done);
STD.TEXTIO.write(TX_LOC, string'(", Expected = "));
IEEE.STD_LOGIC_TEXTIO.write(TX_LOC, next_Done);
STD.TEXTIO.write(TX_LOC, string'(" "));
TX_STR(TX_LOC.all'range) := TX_LOC.all;
STD.TEXTIO.writeline(RESULTS, TX_LOC);
STD.TEXTIO.Deallocate(TX_LOC);
ASSERT (FALSE) REPORT TX_STR SEVERITY ERROR;
TX_ERROR := TX_ERROR + 1;
END IF;
END;
PROCEDURE CHECK_Output(
next_Output : std_logic_vector (3 DownTo 0);
TX_TIME : INTEGER
) IS
VARIABLE TX_STR : String(1 to 4096);
VARIABLE TX_LOC : LINE;
BEGIN
IF (Output /= next_Output) THEN
STD.TEXTIO.write(TX_LOC, string'("Error at time="));
STD.TEXTIO.write(TX_LOC, TX_TIME);
STD.TEXTIO.write(TX_LOC, string'("ns Output="));
IEEE.STD_LOGIC_TEXTIO.write(TX_LOC, Output);
STD.TEXTIO.write(TX_LOC, string'(", Expected = "));
IEEE.STD_LOGIC_TEXTIO.write(TX_LOC, next_Output);
STD.TEXTIO.write(TX_LOC, string'(" "));
TX_STR(TX_LOC.all'range) := TX_LOC.all;
STD.TEXTIO.writeline(RESULTS, TX_LOC);
STD.TEXTIO.Deallocate(TX_LOC);
ASSERT (FALSE) REPORT TX_STR SEVERITY ERROR;
TX_ERROR := TX_ERROR + 1;
END IF;
END;
BEGIN
-- ------------- Current Time: 50ns
WAIT FOR 50 ns;
CHECK_Done('0', 50);
CHECK_Output("0000", 50);
-- -------------------------------------
-- ------------- Current Time: 500ns
WAIT FOR 450 ns;
Reset <= '0';
-- -------------------------------------
-- ------------- Current Time: 650ns
WAIT FOR 150 ns;
CHECK_Done('1', 650);
-- -------------------------------------
-- ------------- Current Time: 750ns
WAIT FOR 100 ns;
CHECK_Done('0', 750);
-- -------------------------------------
-- ------------- Current Time: 850ns
WAIT FOR 100 ns;
CHECK_Done('1', 850);
-- -------------------------------------
-- ------------- Current Time: 950ns
WAIT FOR 100 ns;
CHECK_Done('0', 950);
-- -------------------------------------
-- ------------- Current Time: 1050ns
WAIT FOR 100 ns;
CHECK_Done('1', 1050);
-- -------------------------------------
-- ------------- Current Time: 1150ns
WAIT FOR 100 ns;
CHECK_Done('0', 1150);
-- -------------------------------------
-- ------------- Current Time: 1250ns
WAIT FOR 100 ns;
CHECK_Done('1', 1250);
-- -------------------------------------
-- ------------- Current Time: 1350ns
WAIT FOR 100 ns;
CHECK_Done('0', 1350);
-- -------------------------------------
-- ------------- Current Time: 1450ns
WAIT FOR 100 ns;
CHECK_Done('1', 1450);
-- -------------------------------------
-- ------------- Current Time: 1550ns
WAIT FOR 100 ns;
CHECK_Done('0', 1550);
-- -------------------------------------
-- ------------- Current Time: 1650ns
WAIT FOR 100 ns;
CHECK_Done('1', 1650);
-- -------------------------------------
-- ------------- Current Time: 1750ns
WAIT FOR 100 ns;
CHECK_Done('0', 1750);
-- -------------------------------------
-- ------------- Current Time: 1850ns
WAIT FOR 100 ns;
CHECK_Done('1', 1850);
-- -------------------------------------
-- ------------- Current Time: 1950ns
WAIT FOR 100 ns;
CHECK_Done('0', 1950);
-- -------------------------------------
-- ------------- Current Time: 2050ns
WAIT FOR 100 ns;
CHECK_Done('1', 2050);
-- -------------------------------------
-- ------------- Current Time: 2150ns
WAIT FOR 100 ns;
CHECK_Done('0', 2150);
-- -------------------------------------
-- ------------- Current Time: 2250ns
WAIT FOR 100 ns;
CHECK_Done('1', 2250);
-- -------------------------------------
-- ------------- Current Time: 2350ns
WAIT FOR 100 ns;
CHECK_Done('0', 2350);
-- -------------------------------------
-- ------------- Current Time: 2450ns
WAIT FOR 100 ns;
CHECK_Done('1', 2450);
-- -------------------------------------
-- ------------- Current Time: 2550ns
WAIT FOR 100 ns;
CHECK_Done('0', 2550);
-- -------------------------------------
-- ------------- Current Time: 2650ns
WAIT FOR 100 ns;
CHECK_Done('1', 2650);
-- -------------------------------------
-- ------------- Current Time: 2700ns
WAIT FOR 50 ns;
InputA <= "111";
-- -------------------------------------
-- ------------- Current Time: 2750ns
WAIT FOR 50 ns;
CHECK_Done('0', 2750);
CHECK_Output("0100", 2750);
-- -------------------------------------
-- ------------- Current Time: 2850ns
WAIT FOR 100 ns;
CHECK_Done('1', 2850);
CHECK_Output("0111", 2850);
-- -------------------------------------
-- ------------- Current Time: 2900ns
WAIT FOR 50 ns;
Request <= '0';
-- -------------------------------------
-- ------------- Current Time: 2950ns
WAIT FOR 50 ns;
CHECK_Done('0', 2950);
-- -------------------------------------
-- ------------- Current Time: 3050ns
WAIT FOR 100 ns;
CHECK_Done('1', 3050);
-- -------------------------------------
-- ------------- Current Time: 3150ns
WAIT FOR 100 ns;
CHECK_Done('0', 3150);
-- -------------------------------------
-- ------------- Current Time: 3250ns
WAIT FOR 100 ns;
CHECK_Done('1', 3250);
-- -------------------------------------
-- ------------- Current Time: 3350ns
WAIT FOR 100 ns;
CHECK_Done('0', 3350);
-- -------------------------------------
-- ------------- Current Time: 3450ns
WAIT FOR 100 ns;
CHECK_Done('1', 3450);
-- -------------------------------------
-- ------------- Current Time: 3550ns
WAIT FOR 100 ns;
CHECK_Done('0', 3550);
-- -------------------------------------
-- ------------- Current Time: 3650ns
WAIT FOR 100 ns;
CHECK_Done('1', 3650);
-- -------------------------------------
-- ------------- Current Time: 3750ns
WAIT FOR 100 ns;
CHECK_Done('0', 3750);
-- -------------------------------------
-- ------------- Current Time: 3850ns
WAIT FOR 100 ns;
CHECK_Done('1', 3850);
-- -------------------------------------
-- ------------- Current Time: 3950ns
WAIT FOR 100 ns;
CHECK_Done('0', 3950);
-- -------------------------------------
-- ------------- Current Time: 4050ns
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -