USE work.multiplier_types.all;


ENTITY reg_word IS
  PORT ( clk :        in  bit;
         load :       in  bit;
         d :          in  word;
         q :          out word );
END reg_word;


ARCHITECTURE behaviour OF reg_word IS

BEGIN  --  behaviour 

  reg : PROCESS (clk)
    CONSTANT Tpd_clk_q : Time := 4 ns;
  BEGIN  --  PROCESS reg 
    IF (clk = '1' AND load = '1') THEN
      q  <= d after Tpd_clk_q;
    END IF;
  END PROCESS reg;

END behaviour;