标题: dual ram [打印本页]
作者: graduate 时间: 2007-12-6 10:59 标题: dual ram
-- 双端口() ram22.vhd 2007.12.5
library ieee;
use ieee.std_logic_1164.all;
use ieee.std_logic_arith.all;
use ieee.std_logic_unsigned.all;
ENTITY ram22 IS
generic( Dwidth: integer :=14; -- 数据
Awidth: integer :=8); -- 地址
port(
clock : IN STD_LOGIC;
wren : IN STD_LOGIC; -- 高电平写入 ram
data_im_in : IN STD_LOGIC_VECTOR(Dwidth-1 downto 0);
data_re_in : IN STD_LOGIC_VECTOR(Dwidth-1 downto 0);
wr_adr : IN STD_LOGIC_VECTOR(Awidth-1 downto 0);
rd_adr : IN STD_LOGIC_VECTOR(Awidth-1 downto 0);
data_re_out : OUT STD_LOGIC_VECTOR(Dwidth-1 downto 0);
data_im_out : OUT STD_LOGIC_VECTOR(Dwidth-1 downto 0));
END ram22;
architecture blockdram of ram22 is
constant Addepth : natural := 2**Awidth;
type ram_type is array(0 to Addepth-1) of Std_Logic_Vector(Dwidth-1 downto 0);
signal mem0,mem1 : ram_type := (others => (others => '0'));
signal addr_reg0,addr_reg1: std_logic_vector(Awidth-1 downto 0); -- avoid double drives
begin
-- ram0
wr0: process( clock )
begin
if rising_edge(clock) then
if wren = '1' then
mem0(conv_integer(wr_adr)) <= data_re_in;
end if;
end if;
end process wr0;
rd0: process( clock )
begin
if rising_edge(clock) then
addr_reg0 <= rd_adr;
end if;
data_re_out <= mem0(conv_integer(addr_reg0));
end process rd0;
--data_re_out <= mem0(conv_integer(addr_reg0));
-- ram1
wr1: process( clock )
begin
if rising_edge(clock) then
if wren = '1' then
mem1(conv_integer(wr_adr)) <= data_im_in;
end if;
end if;
end process wr1;
rd1: process( clock )
begin
if rising_edge(clock) then
addr_reg1 <= rd_adr;
end if;
end process rd1;
data_im_out <= mem1(conv_integer(addr_reg1));
end blockdram;
尽管使用上面的代码在quartus中综合的时候，quartus也会使用generating altsyncram megafunction to implement对代码进行优化，但是他和直接使用 lpm_ram_dp 例化效果不是一致
直接使用 lpm_ram_dp 例化采用读优先逻辑，而上面的代码使用的是写优先逻辑
作者: caopengly 时间: 2007-12-6 14:09
呵呵，lz还比较仔细，我认为ram的读写还是由wren 决定的
wr0: process( clock )
begin
if rising_edge(clock) then
if wren = '1' then 这里有判断wren的值，而对应的rd程序就没有。就是在clock上升沿且wren=1时写数，而rd段没有这个限制，只要clock上升就可以读出数据。因为是双端的，不会有地址数据冲突的现象。所以我个人觉得谁优先没有关系，吧wren控制好就可以了。
mem0(conv_integer(wr_adr)) <= data_re_in;
end if;
end if;
end process wr0;
rd0: process( clock )
begin
if rising_edge(clock) then
addr_reg0 <= rd_adr;
end if;
data_re_out <= mem0(conv_integer(addr_reg0));
end process rd0;
--data_re_out <= mem0(conv_integer(addr_reg0));
[此贴子已经被作者于2007-12-6 14:23:12编辑过]
| 欢迎光临 电子技术论坛_中国专业的电子工程师学习交流社区-中电网技术论坛 (http://bbs.eccn.com/) |
Powered by Discuz! 7.0.0 |