| Line 1... |
Line 1... |
-------------------------------------------------------------------------------
|
-------------------------------------------------------------------------------
|
--
|
--
|
-- The L port controller.
|
-- The L port controller.
|
--
|
--
|
-- $Id: t400_io_l.vhd,v 1.2 2006-05-23 01:14:28 arniml Exp $
|
-- $Id: t400_io_l.vhd,v 1.3 2006-06-05 14:21:21 arniml Exp $
|
--
|
--
|
-- Copyright (c) 2006 Arnim Laeuger (arniml@opencores.org)
|
-- Copyright (c) 2006 Arnim Laeuger (arniml@opencores.org)
|
--
|
--
|
-- All rights reserved
|
-- All rights reserved
|
--
|
--
|
| Line 65... |
Line 65... |
port (
|
port (
|
-- System Interface -------------------------------------------------------
|
-- System Interface -------------------------------------------------------
|
ck_i : in std_logic;
|
ck_i : in std_logic;
|
ck_en_i : in boolean;
|
ck_en_i : in boolean;
|
por_i : in boolean;
|
por_i : in boolean;
|
|
in_en_i : in boolean;
|
-- Control Interface ------------------------------------------------------
|
-- Control Interface ------------------------------------------------------
|
op_i : in io_l_op_t;
|
op_i : in io_l_op_t;
|
en2_i : in std_logic;
|
en2_i : in std_logic;
|
m_i : in dw_t;
|
m_i : in dw_t;
|
a_i : in dw_t;
|
a_i : in dw_t;
|
| Line 124... |
Line 125... |
end case;
|
end case;
|
end if;
|
end if;
|
|
|
-- Microbus functionality
|
-- Microbus functionality
|
if opt_microbus_g = t400_opt_microbus_c then
|
if opt_microbus_g = t400_opt_microbus_c then
|
if cs_n_i = '0' and wr_n_i = '0' then
|
if in_en_i and
|
|
cs_n_i = '0' and wr_n_i = '0' then
|
q_q <= to_X01(io_l_i);
|
q_q <= to_X01(io_l_i);
|
end if;
|
end if;
|
end if;
|
end if;
|
end if;
|
end if;
|
end process q_reg;
|
end process q_reg;
|
| Line 217... |
Line 219... |
|
|
-------------------------------------------------------------------------------
|
-------------------------------------------------------------------------------
|
-- File History:
|
-- File History:
|
--
|
--
|
-- $Log: not supported by cvs2svn $
|
-- $Log: not supported by cvs2svn $
|
|
-- Revision 1.2 2006/05/23 01:14:28 arniml
|
|
-- use to_X01 for primary input bus
|
|
--
|
-- Revision 1.1.1.1 2006/05/06 01:56:44 arniml
|
-- Revision 1.1.1.1 2006/05/06 01:56:44 arniml
|
-- import from local CVS repository, LOC_CVS_0_1
|
-- import from local CVS repository, LOC_CVS_0_1
|
--
|
--
|
-------------------------------------------------------------------------------
|
-------------------------------------------------------------------------------
|
|
|
No newline at end of file
|
No newline at end of file
|
