-- Model Name : Procedural - Parwan Tester
-- Author : Zainalabedin Navabi
-- Last Updated : 09 / 15 / 1996
-- This document is © copyrighted by the Author.
LIBRARY IEEE;
USE IEEE.std_logic_1164.ALL;
--
LIBRARY EXEMPLAR;
USE EXEMPLAR.exemplar_1164.ALL;
USE EXEMPLAR.exemplar.ALL;
--
LIBRARY WORK;
USE WORK.ParFunctional.ALL;
USE WORK.synthesis_parameters.ALL;
USE WORK.synthesis_utilities.ALL;
--
ENTITY parwan_tester IS
END parwan_tester;
--
ARCHITECTURE input_output OF parwan_tester IS
COMPONENT parwan
PORT (interrupt : IN std_logic; read_mem, write_mem : OUT std_logic);
END COMPONENT;
FOR cpu : parwan USE ENTITY WORK.par_central_processing_unit(functional);
COMPONENT parmem PORT (read, write : IN std_logic); END COMPONENT;
FOR mem : parmem USE ENTITY WORK.parwan_memory (behavioral);
SIGNAL clock, interrupt, read, write : std_logic := '0';
SIGNAL data : byte;
SIGNAL address : twelve;
BEGIN
clk : clock <= NOT clock AFTER 2 US WHEN halt='0' ELSE clock;
int : interrupt <= '1', '0' AFTER 4500 NS;
ck2 : cck <= clock;
-- PROCESS (clock) BEGIN data <= databus; address <= adbus; END PROCESS;
cpu : parwan PORT MAP (interrupt, read, write);
mem : parmem PORT MAP (read, write);
-- dump_signal <= '1' WHEN halt='1';
END input_output;