exec impl.

[calu.git] / cpu / src / alu_pkg.vhd

diff --git a/cpu/src/alu_pkg.vhd b/cpu/src/alu_pkg.vhd
index 05e040d1a8873303a02b259c5213b37292018ea7..088565bd28342f3d18c6aa04e1353e79367ce38a 100755 (executable)
--- a/cpu/src/alu_pkg.vhd
+++ b/cpu/src/alu_pkg.vhd
@@ -26,14 +26,14 @@ package alu_pkg is
                result_addr : gp_addr_t;\r
                \r
                status : status_rec;\r
-               stackpointer : gp_register_t;\r
+               --stackpointer : gp_register_t;\r
 \r
                alu_jmp : std_logic;\r
-               brpr_bit : std_logic;\r
+               brpr : std_logic;\r
                reg_op : std_logic;\r
                mem_op  : std_logic;\r
                \r
-               new_val : std_logic;\r
+               --new_val : std_logic;\r
                mem_en : std_logic;\r
                \r
                hw_op   : std_logic;\r
@@ -71,7 +71,24 @@ package alu_pkg is
        -- function xor_op(left_operand, right_operand : gp_register_t; alu_result : alu_result_rec) return alu_result_rec;\r
        \r
        -- function shift_op(left_operand, right_operand : gp_register_t; arith,sleft,carry : std_logic ;alu_result : alu_result_rec) return alu_result_rec;\r
-       \r
+       
+        component alu is
+        --some modules won't need all inputs\r
+       port(\r
+       --System inputs\r
+       \r
+                       clk : in std_logic;\r
+                       reset : in std_logic;\r
+       --operation inputs\r
+                       condition : in condition_t;\r
+                       op_group : in op_info_t;\r
+                       left_operand : in gp_register_t;\r
+                       right_operand : in gp_register_t;\r
+                       op_detail : in op_opt_t;\r
+                       alu_state  : in alu_result_rec;\r
+                       alu_result : out alu_result_rec\r
+               );
+        end component alu;\r
        \r
 end package alu_pkg;\r
 \r