end record alu_testv;
-- ggf. groesse des arrays erhoehen
- type alu_testv_array is array (natural range 0 to 60) of alu_testv;
+ type alu_testv_array is array (natural range 0 to 65) of alu_testv;
variable testmatrix : alu_testv_array :=
( 0 => (-5, ALU_DIV, 3, 2, -1, false),
54 => (0, ALU_DIV, 10, 0, 0, false),
55 => (10, ALU_DIV, 10, 0, 1, false),
56 => (5134123, ALU_DIV, 358015, 121913, 14, false),
+ -- extra
+ 60 => (5, ALU_SUB, -2147483648, 0, 0, true),
+ 61 => (-2147483647, ALU_SUB, 1, 0, -2147483648, false),
+ 62 => (-2147483647, ALU_ADD, -1, 0, -2147483648, false),
+ 63 => (-2147483648, ALU_DIV, 10, 8, -214748364, false),
others => (0, ALU_ADD, 0, 0, 0, false)
);
variable checkall : boolean := true;