--
-- Component : sexer
--
-- Generated by System Architect version v8.5_2.2 by ja-wells on Mar 20, 97
--
-- sensitivity_attr :: 'transaction

ARCHITECTURE spec OF sexer IS
BEGIN
   -------------------------------------------------------------------
   vhdl_sexer : PROCESS (ExType, Imm)
   -------------------------------------------------------------------
	variable state : mips_word;
   BEGIN
	if (ExType = '0') then
		state := zero_extend(Imm, 32);
	else
		state(31 downto 16) := (OTHERS => Imm(15));
		state(15 downto 0) := Imm;
	end if;

	Imm_D <= state;

   END PROCESS vhdl_sexer ;
END spec ;