X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fparser.vhd;h=4ad14cc9246a34443f2aa2ebeb710632d5294eaa;hb=HEAD;hp=95952d1dd45ad553c43f4bc68a5202368b2efe25;hpb=2cfb306c2efd621a0ec9e05e0a74aec0a8031b4b;p=hwmod.git

diff --git a/src/parser.vhd b/src/parser.vhd
index 95952d1..4ad14cc 100644
--- a/src/parser.vhd
+++ b/src/parser.vhd
@@ -46,7 +46,6 @@ architecture beh of parser is
 	signal firstz_next, firstz_int : boolean;
 	signal err_next, err_int : hstr_int;
 	signal errc_next, errc_int : hstr_int;
-	signal errc_tmp_next, errc_tmp_int : hstr_int;
 	-- ALU
 	signal opcode : alu_ops;
 	signal op1 : csigned;
@@ -57,9 +56,8 @@ architecture beh of parser is
 	signal calc_done : std_logic;
 	signal calc_error : std_logic;
 begin
-	instalu : entity work.alu(beh)
-	port map
-	(
+	instalu : alu
+	port map (
 		sys_clk => sys_clk,
 		sys_res_n => sys_res_n,
 		do_calc => do_calc,
@@ -97,7 +95,6 @@ begin
 			opp_int <= ALU_NOP;
 			err_int <= 0;
 			errc_int <= HSPALTE_MAX;
-			errc_tmp_int <= 0;
 			firstz_int <= true;
 			-- out ports
 			p_rget_int <= '0';
@@ -122,7 +119,6 @@ begin
 			opp_int <= opp_next;
 			err_int <= err_next;
 			errc_int <= errc_next;
-			errc_tmp_int <= errc_tmp_next;
 			firstz_int <= firstz_next;
 			-- out ports
 			p_rget_int <= p_rget_next;
@@ -142,7 +138,7 @@ begin
 			calc_done, wtmp_int, opp_int, z_sign_int, err_int, errc_int,
 			calc_error, op2_int, state_int, p_write_int, z_int, rbyte_int,
 			p_rget_int, opcode_int, op1_int, op3, opM, do_calc_int,
-			errc_tmp_int, firstz_int)
+			firstz_int)
 		function hbyte2csigned (x : hbyte) return csigned is
 			variable y : csigned;
 		begin
@@ -203,7 +199,6 @@ begin
 		opp_next <= opp_int;
 		err_next <= err_int;
 		errc_next <= errc_int;
-		errc_tmp_next <= errc_tmp_int;
 		firstz_next <= firstz_int;
 		-- signals
 		p_rget_next <= '0';
@@ -494,8 +489,8 @@ begin
 			when SBLANK1 =>
 				p_wtake_next <= '1';
 				p_write_next <= x"20";
-				errc_tmp_next <= errc_int - 1;
 				if p_wdone = '1' then
+					errc_next <= errc_int - 1;
 					if errc_int <= 2 then
 						state_next <= SDONE;
 					else
@@ -503,7 +498,6 @@ begin
 					end if;
 				end if;
 			when SBLANK2 =>
-				errc_next <= errc_tmp_int;
 				if p_wdone = '0' then
 					state_next <= SBLANK1;
 				end if;
@@ -511,8 +505,8 @@ begin
 			when SERROR1 =>
 				p_wtake_next <= '1';
 				p_write_next <= hbyte(to_unsigned (character'pos(error_str(err_int)(errc_int)),8));
-				errc_tmp_next <= errc_int - 1;
 				if p_wdone = '1' then
+					errc_next <= errc_int - 1;
 					if errc_int <= 2 then
 						state_next <= SDONE;
 					else
@@ -520,7 +514,6 @@ begin
 					end if;
 				end if;
 			when SERROR2 =>
-				errc_next <= errc_tmp_int;
 				if p_wdone = '0' then
 					state_next <= SERROR1;
 				end if;