Subversion Repositories a-z80

module ram(clk, addr, we, data_in, data_out);

parameter n = 4;

input clk, we;

input [n-1:0] addr;

input [7:0] data_in;

output reg [7:0] data_out;

reg [7:0] reg_array [2**n-1:0];

initial $readmemb("ram.mif", reg_array);

always @(posedge clk)

begin

    if (we == 1)

        reg_array[addr] <= data_in;

    data_out = reg_array[addr];

end

endmodule