Return to daatest_gen.cpp CVS log

Up to [Isaki's NoNo m68k/m88k emulator] / nono / exp / optestxp

Annotation of nono/exp/optestxp/daatest_gen.cpp, revision 1.1.1.1

1.1       root        1: //
                      2: // nono
                      3: // Copyright (C) 2023 nono project
                      4: // Licensed under nono-license.txt
                      5: //
                      6: 
                      7: //
                      8: // DAA のテスト
                      9: //
                     10: 
                     11: #include "optestxp_subr.h"
                     12: 
                     13: static void
                     14: gentest_daa()
                     15: {
                     16:        init("daa", "testrun1");
                     17: 
                     18:        out("testexec_%s:\n", testname);
                     19:        out("   DAA\n");
                     20:        out("   RET\n");
                     21: 
                     22:        out_testset();
                     23: 
                     24:        for (int nin = 0; nin <= 1; nin++) {
                     25:                for (uint32 dst = 0; dst < 0x100; dst++) {
                     26:                        for (int hin = 0; hin <= 1; hin++) {
                     27:                                for (int cin = 0; cin <= 1; cin++) {
                     28:                                        uint32 ah = dst >> 4;
                     29:                                        uint32 al = dst & 0x0f;
                     30:                                        uint32 add = 0;
                     31:                                        bool c = false;
                     32: 
                     33:                                        if (nin == 0) {
                     34:                                                if (cin == 0) {
                     35:                                                        if (hin == 0) {
                     36:                                                                if (ah < 9) {
                     37:                                                                        if (al < 10) {
                     38:                                                                        } else {
                     39:                                                                                add = 0x06;
                     40:                                                                        }
                     41:                                                                } else if (ah == 9) {
                     42:                                                                        if (al < 10) {
                     43:                                                                        } else {
                     44:                                                                                add = 0x66;
                     45:                                                                                c = true;
                     46:                                                                        }
                     47:                                                                } else {
                     48:                                                                        if (al < 10) {
                     49:                                                                                add = 0x60;
                     50:                                                                        } else {
                     51:                                                                                add = 0x66;
                     52:                                                                        }
                     53:                                                                        c = true;
                     54:                                                                }
                     55:                                                        } else {        // H=1
                     56:                                                                if (ah < 9) {
                     57:                                                                        add = 0x06;
                     58:                                                                } else if (ah == 9) {
                     59:                                                                        if (1 || al < 10) {     // HD64180?
                     60:                                                                                add = 0x06;
                     61:                                                                        } else {
                     62:                                                                                add = 0x66;
                     63:                                                                                c = true;
                     64:                                                                        }
                     65:                                                                } else {
                     66:                                                                        add = 0x66;
                     67:                                                                        c = true;
                     68:                                                                }
                     69:                                                        }
                     70:                                                } else {        // C=1
                     71:                                                        if (hin == 0) {
                     72:                                                                if (al < 10) {
                     73:                                                                        add = 0x60;
                     74:                                                                } else {
                     75:                                                                        add = 0x66;
                     76:                                                                }
                     77:                                                        } else {
                     78:                                                                add = 0x66;
                     79:                                                        }
                     80:                                                        c = true;
                     81:                                                }
                     82:                                        } else {        // N=1
                     83:                                                if (cin == 0) {
                     84:                                                        if (hin == 0) {
                     85:                                                        } else {        // H=1
                     86:                                                                add = 0x06;
                     87:                                                                if (dst < 6) {
                     88:                                                                        c = true;
                     89:                                                                }
                     90:                                                        }
                     91:                                                } else {        // C=1
                     92:                                                        if (hin == 0) {
                     93:                                                                add = 0x60;
                     94:                                                        } else {
                     95:                                                                add = 0x66;
                     96:                                                        }
                     97:                                                        c = true;
                     98:                                                }
                     99:                                        }
                    100: 
                    101:                                        uint32 res32;
                    102:                                        if (nin == 0) {
                    103:                                                res32 = dst + add;
                    104:                                        } else {
                    105:                                                res32 = dst - add;
                    106:                                        }
                    107:                                        uint8 res = res32;
                    108: 
                    109:                                        hd64180flag inflag;
                    110:                                        inflag.N = nin;
                    111:                                        inflag.H = hin;
                    112:                                        inflag.C = cin;
                    113: 
                    114:                                        hd64180flag flag;
                    115:                                        flag.Z = (res == 0);
                    116:                                        flag.S = ((res & 0x80) != 0);
                    117:                                        flag.C = c;
                    118:                                        flag.PV = pflag(res);
                    119:                                        flag.H = (nin == 0) ?
                    120:                                                hflag_add(dst, add) : hflag_sub(dst, add);
                    121:                                        flag.N = nin;
                    122:                                        out_testdata_run1(dst, inflag, res, flag);
                    123:                                }
                    124:                        }
                    125:                }
                    126:        }
                    127:        out("   defb    0,0,0,0FFH\n");
                    128:        out("\n");
                    129: }
                    130: 
                    131: int
                    132: main(int ac, char *av[])
                    133: {
                    134:        out("   org     0100H\n");
                    135:        gentest_daa();
                    136:        out("   RET\n");
                    137: 
                    138:        return 0;
                    139: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.