X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=cpu%2Fsrc%2From_b.vhd;fp=cpu%2Fsrc%2From_b.vhd;h=d7b5da1fb29500f6a855b0d8615828b8cf2c63ba;hb=8558b10449023bd73fafd703e7c3cddff012cb8e;hp=d57a959d978f9f9d60ac5bf1cc79a49a36423ad9;hpb=2479c11c20e9e64487cff87170ac68299acfad23;p=calu.git diff --git a/cpu/src/rom_b.vhd b/cpu/src/rom_b.vhd index d57a959..d7b5da1 100644 --- a/cpu/src/rom_b.vhd +++ b/cpu/src/rom_b.vhd @@ -124,35 +124,23 @@ begin -- when "00000001000" => data_out <= x"e7280004"; -- -- when "00000001001" => data_out <= x"eb7ffb81"; - -- when "0000000" => data_out <= "11101011000000000000010000000010"; - -- when "0000001" => data_out <= "11101011000000000001000000000110"; - -- when "0000010" => data_out <= x"eb000008"; + when "0000000" => data_out <= "11101011000000000000010000000010"; + when "0000001" => data_out <= "11101011000000000001000000000110"; + when "0000010" => data_out <= x"eb000008"; - -- when "0001000" => data_out <= x"ed090058"; - -- when "0001001" => data_out <= x"ed110060"; - -- when "0001010" => data_out <= x"ed190080"; - -- when "0001011" => data_out <= x"ed210120"; - -- when "0001100" => data_out <= x"ed280018"; - -- when "0001101" => data_out <= x"e7aa0000"; + when "0001000" => data_out <= x"ed090058"; + when "0001001" => data_out <= x"ed110060"; + when "0001010" => data_out <= x"ed190080"; + when "0001011" => data_out <= x"ed210120"; + when "0001100" => data_out <= x"ed280018"; + when "0001101" => data_out <= x"e7aa0000"; -- when "0100000" => data_out <= x"f7aa0000"; - -- when "0100001" => data_out <= x"e7390000"; - -- when "0100010" => data_out <= x"e13b8008"; - -- when "0100011" => data_out <= x"e7b98000"; - -- when "0100100" => data_out <= x"e7b88000"; - -- when "0100101" => data_out <= x"eb000008"; - - when "0000000" => data_out <= x"eb000281";--br 5;; - when "0000001" => data_out <= "11101011000000000001000000000110"; - when "0000010" => data_out <= x"eb000008"; - -when "0000101" => data_out <= x"ed0101b8";--ldi r0, 0x2037;; -when "0000110" => data_out <= x"ed0901d8";--ldi r1, 0x203b;; -when "0000111" => data_out <= x"ed100020";--ldi r2, 4;; -when "0001000" => data_out <= x"ed180028";--ldi r3, 5;; -when "0001001" => data_out <= x"e7900000";--stw r2, 0(r0);; -when "0001010" => data_out <= x"e7988000";--stw r3, 0(r1);; - + when "0100001" => data_out <= x"e7390000"; + when "0100010" => data_out <= x"e13b8008"; + when "0100011" => data_out <= x"e7b98000"; + when "0100100" => data_out <= x"e7b88000"; + when "0100101" => data_out <= x"eb000008"; when others => data_out <= "11101011000000000000000000000010";