OpenCores
URL https://opencores.org/ocsvn/t6507lp/t6507lp/trunk

Subversion Repositories t6507lp

Compare Revisions

  • This comparison shows the changes necessary to convert path
    /t6507lp/trunk/fv
    from Rev 133 to Rev 134
    Reverse comparison

Rev 133 → Rev 134

/alu_agent.e
47,7 → 47,7
 
extend alu_mon_u {
agent: alu_agent_u;
event main_clk is only @agent.main_clk;
event main_clk is only @agent.bfm.done;
};
 
 
/alu_bfm.e
6,7 → 6,8
alu_enable: out simple_port of bool;
alu_opcode: out simple_port of byte;
alu_a: out simple_port of byte;
 
event done;
event main_clk;
 
on main_clk {
22,7 → 23,7
alu_a$ = data.alu_a;
 
agent.chk.store(data);
 
emit done;
};
 
};
/alu_chk.e
18,7 → 18,9
keep count_cycles == 0;
 
store(input : alu_input_s) is {
out ("cycle ", count_cycles, ": input stored: ");
count_cycles = count_cycles + 1;
 
out ("CYCLE ", count_cycles, " STORE:");
print input;
 
if (first_cycle) {
30,7 → 32,6
next_inst = input;
};
 
count_cycles = count_cycles + 1;
 
if (count_cycles == 10000) {
dut_error();
46,13 → 47,17
reg_a = 0; // TODO: check this
}
else {
 
out ("CYCLE ", count_cycles, " COMPARE:");
print inst;
 
case inst.input_kind {
ENABLED_VALID: {
out("cycle ", count_cycles, ": executing and comparing");
out("CYCLE ", count_cycles, ": executing and comparing");
execute();
};
DISABLED_VALID: {
out("cycle ", count_cycles, ": just comparing");
out("CYCLE ", count_cycles, ": just comparing");
};
default: {
dut_error("error at e code");
61,6 → 66,8
// here i have already calculated. must compare!
if (reg_a != alu_result) {
print reg_a;
print alu_result;
dut_error("WRONG!");
};
 
119,7 → 126,7
 
print me;
 
dut_error();
//dut_error();
};
 
update_z(arg : byte) is {

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.