clash-verilog-0.7.1: primitives/CLaSH.Prelude.BlockRam.json

[ { "BlackBox" :
    { "name" : "CLaSH.Prelude.BlockRam.blockRam#"
    , "type" :
"blockRam# :: SClock clk       -- clk,  ARG[0]
           -> Vec n a          -- init, ARG[1]
           -> Signal' clk Int  -- rd,   ARG[2]
           -> Signal' clk Bool -- wren, ARG[3]
           -> Signal' clk Int  -- wr,   ARG[4]
           -> Signal' clk a    -- din,  ARG[5]
           -> Signal' clk a"
    , "templateD" :
"// blockRam begin
reg ~TYPO ~GENSYM[RAM][0] [0:~LENGTH[~TYP[1]]-1];
reg ~TYPO ~GENSYM[dout][1];

reg ~TYP[1] ~GENSYM[ram_init][2];
integer ~GENSYM[i][3];
initial begin
  ~SYM[2] = ~ARG[1];
  for (~SYM[3]=0; ~SYM[3] < ~LENGTH[~TYP[1]]; ~SYM[3] = ~SYM[3] + 1) begin
    ~SYM[0][~LENGTH[~TYP[1]]-1-~SYM[3]] = ~SYM[2][~SYM[3]*~SIZE[~TYPO]+:~SIZE[~TYPO]];
  end
end

always @(posedge ~CLK[0]) begin : ~GENSYM[~COMPNAME_blockRam][4]
  if (~ARG[3]) begin
    ~SYM[0][~ARG[4]] <= ~ARG[5];
  end
  ~SYM[1] <= ~SYM[0][~ARG[2]];
end

assign ~RESULT = ~SYM[1];
// blockRam end"
    }
  }
]