emit_add_sub also test the two carry values
Some checks are pending
Build / cmake-builds (push) Waiting to run
Build / makefile (macos-latest, besm6 imlac tt2500 microvax3900 microvax1 rtvax1000 vaxstation3100m76 vaxstation4000m60) (push) Waiting to run
Build / makefile (macos-latest, id16 id32 sds lgp h316 cdc1700 swtp6800mp-a swtp6800mp-a2 tx-0 ssem b5500 sage pdq3 alpha) (push) Waiting to run
Build / makefile (macos-latest, microvax2 vax730 vax750 vax780 vax8200 vax8600 microvax2000 infoserver100 infoserver150vxt microvax3100 microvax3100e vaxstation3100m30 vaxstation3100m38) (push) Waiting to run
Build / makefile (macos-latest, microvax3100m80 vaxstation4000vlc infoserver1000 nova eclipse hp2100 hp3000 i1401 i1620 s3 altair altairz80 gri i7094) (push) Waiting to run
Build / makefile (macos-latest, pdp1 pdp4 pdp6 pdp7 pdp8 pdp9 pdp10 pdp10-ka pdp10-ki pdp10-kl pdp10-ks pdp11 pdp15 vax) (push) Waiting to run
Build / makefile (macos-latest, scelbi 3b2 i701 i704 i7010 i7070 i7080 i7090 sigma uc15 i650 sel32 intel-mds ibm1130) (push) Waiting to run
Build / makefile (ubuntu-latest, besm6 imlac tt2500 microvax3900 microvax1 rtvax1000 vaxstation3100m76 vaxstation4000m60) (push) Waiting to run
Build / makefile (ubuntu-latest, id16 id32 sds lgp h316 cdc1700 swtp6800mp-a swtp6800mp-a2 tx-0 ssem b5500 sage pdq3 alpha) (push) Waiting to run
Build / makefile (ubuntu-latest, microvax2 vax730 vax750 vax780 vax8200 vax8600 microvax2000 infoserver100 infoserver150vxt microvax3100 microvax3100e vaxstation3100m30 vaxstation3100m38) (push) Waiting to run
Build / makefile (ubuntu-latest, microvax3100m80 vaxstation4000vlc infoserver1000 nova eclipse hp2100 hp3000 i1401 i1620 s3 altair altairz80 gri i7094) (push) Waiting to run
Build / makefile (ubuntu-latest, pdp1 pdp4 pdp6 pdp7 pdp8 pdp9 pdp10 pdp10-ka pdp10-ki pdp10-kl pdp10-ks pdp11 pdp15 vax) (push) Waiting to run
Build / makefile (ubuntu-latest, scelbi 3b2 i701 i704 i7010 i7070 i7080 i7090 sigma uc15 i650 sel32 intel-mds ibm1130) (push) Waiting to run

This commit is contained in:
Folkert van Heusden 2025-04-04 09:02:18 +02:00
parent 524d540a2a
commit ae0c503054
Signed by untrusted user who does not match committer: folkert
GPG key ID: 6B6455EDFEED3BD1

View file

@ -40,7 +40,7 @@ int n_test_values = 0;
void generate_test_values() void generate_test_values()
{ {
for(int i=1; i<65536; i+=14) { for(int i=1; i<65536; i+=28) {
if (is_prime(i)) if (is_prime(i))
test_values[n_test_values++] = i; test_values[n_test_values++] = i;
} }
@ -248,47 +248,57 @@ void emit_condition_sets()
dump_json("pdp1170-valtest-CONDITIONS.json", out); dump_json("pdp1170-valtest-CONDITIONS.json", out);
} }
void emit_add_sub() void emit_add_sub_c()
{ {
int id = 0; int id = 0;
json_t *out = json_array(); json_t *out = json_array();
int count = 0; int count = 0;
int total = n_test_values * n_test_values * 2; int total = n_test_values * n_test_values * 4 * 2;
time_t start = time(NULL); time_t start = time(NULL);
printf("ADD/SUB instructions\n"); printf("ADD/SUB/ADC/SBC instructions\n");
for(int group=0; group<2; group++) { for(int group=0; group<4; group++) {
uint16_t instr = (6 << 12 /* instr */) | (group << 15 /* ADD/SUB */) | (1 << 6 /* src=R1 */); uint16_t instr = 0;
int word = group & 1;
if (group == 0 || group == 1)
instr = (6 << 12 /* instr */) | (word << 15 /* ADD/SUB */) | (1 << 6 /* src=R1 */);
else if (group == 2)
instr = (055 << 6 /* instr */) | (word << 15 /* ADCb/ADCw */) | (1 << 6 /* src=R1 */);
else if (group == 3)
instr = (056 << 6 /* instr */) | (word << 15 /* SBCb/SBCw */) | (1 << 6 /* src=R1 */);
for(int v1=0; v1<n_test_values; v1++) { for(int v1=0; v1<n_test_values; v1++) {
for(int v2=0; v2<n_test_values; v2++) { for(int v2=0; v2<n_test_values; v2++) {
count++; for(int psw_val=0; psw_val<2; psw_val++) {
count++;
init_simh(); init_simh();
saved_PC = 0100; saved_PC = 0100;
randomize_registers_all_values(); randomize_registers_all_values();
REGFILE[0][0] = REGFILE[0][1] = v1; REGFILE[0][0] = REGFILE[0][1] = v1;
REGFILE[1][0] = REGFILE[1][1] = v2; REGFILE[1][0] = REGFILE[1][1] = v2;
init_stack_registers(); init_stack_registers();
struct mem_t mem[1] = { struct mem_t mem[1] = {
{ 0100, instr } { 0100, instr }
}; };
PSW = 0; PSW = psw_val;
json_t *obj = generate_test(instr, &id, mem, 1); json_t *obj = generate_test(instr, &id, mem, 1);
if (obj) if (obj)
json_array_append_new(out, obj); json_array_append_new(out, obj);
}
} }
printf("%.2f%% %f \r", count * 100 / (double)total, total / (double)count * (time(NULL) - start)); printf("%.2f%% %f \r", count * 100 / (double)total, total / (double)count * (time(NULL) - start));
fflush(NULL); fflush(NULL);
} }
} }
dump_json("pdp1170-valtest-ADD_SUB.json", out); dump_json("pdp1170-valtest-ADD_SUB_ADC_SBC.json", out);
} }
void produce_validation_tests() void produce_validation_tests()
@ -299,5 +309,5 @@ void produce_validation_tests()
emit_branch_instructions(); emit_branch_instructions();
emit_condition_sets(); emit_condition_sets();
emit_add_sub(); emit_add_sub_c();
} }