N 1887 src/dps8/dps8_append.c goto N; N 2089 src/dps8/dps8_append.c N: // CALL6 N 571 src/dps8/dps8_cpu.h uint N [3]; N 572 src/dps8/dps8_cpu.h #define N1 N [0] N 573 src/dps8/dps8_cpu.h #define N2 N [1] N 574 src/dps8/dps8_cpu.h #define N3 N [2] N 772 src/dps8/dps8_eis.c N 777 src/dps8/dps8_eis.c N 779 src/dps8/dps8_eis.c N 781 src/dps8/dps8_eis.c N 1442 src/dps8/dps8_eis.c e -> N [k - 1] = (uint) getMFReg36 (reg, false, false, mod_fault); // RL=1: disallow du,n,ic N 1450 src/dps8/dps8_eis.c e -> N [k - 1] &= 017777777; // 22-bits of length N 1455 src/dps8/dps8_eis.c e -> N [k - 1] &= 07777777; // 21-bits of length. N 1466 src/dps8/dps8_eis.c e -> N [k - 1] = opDesc & 07777; N 1471 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "N%u %o\n", k, e->N[k-1]); N 1715 src/dps8/dps8_eis.c e->N[k-1] = getMFReg18(reg, false, false, mod_fault) & 077; // RL=1: disallow du,n,ic N 1718 src/dps8/dps8_eis.c e->N[k-1] = opDesc & 077; N 1720 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "parseNumericOperandDescriptor(): N%u %0o\n", k, e->N[k-1]); N 1732 src/dps8/dps8_eis.c N 1735 src/dps8/dps8_eis.c N 1818 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "parseNumericOperandDescriptor(): address:%06o cPos:%d bPos:%d N%u %u\n", cpu.du.Dk_PTR_W[k-1], a->cPos, a->bPos, k, e->N[k-1]); N 1820 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "parseNumericOperandDescriptor(): address:%06o cPos:%d bPos:%d N%u %u\n", a->address, a->cPos, a->bPos, k, e->N[k-1]); N 1877 src/dps8/dps8_eis.c e->N[k-1] = getMFReg36(reg, false, false, mod_fault) & 077777777; // RL=1: disallow du,n,ic N 1878 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "bitstring k %d RL reg %u val %"PRIo64"\n", k, reg, (word36)e->N[k-1]); N 1882 src/dps8/dps8_eis.c e ->N[k-1] = opDesc & 07777; N 1886 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "N%u %u\n", k, e->N[k-1]); N 5033 src/dps8/dps8_eis.c int N = (int) e->N[k-1]; // number of chars in src string N 5040 src/dps8/dps8_eis.c for(int n = 0 ; n < N ; n += 1) N 5088 src/dps8/dps8_eis.c else if (TN == CTN9 && n == N-1) // the 9-bit exponent (of which only 8-bits are used) N 5093 src/dps8/dps8_eis.c else if (TN == CTN4 && n == N-2) // the 1st 4-chars of the 8-bit exponent N 5099 src/dps8/dps8_eis.c else if (TN == CTN4 && n == N-1) // the 2nd 4-chars of the 8-bit exponent N 5142 src/dps8/dps8_eis.c if (n == N-1) // last had better be a sign .... N 5194 src/dps8/dps8_eis.c uint N = min (e-> N1, 63); N 5196 src/dps8/dps8_eis.c for (uint n = 0 ; n < N ; n ++) N 6518 src/dps8/dps8_eis.c e->mopTally = (int) e->N[KMOP]; // number of micro-ops N 6522 src/dps8/dps8_eis.c e->mopTally = (int) e->N[kMop-1]; // number of micro-ops N 6880 src/dps8/dps8_eis.c if (e->N[1] == 0) N 6885 src/dps8/dps8_eis.c if (e->N[2] == 0) N 9103 src/dps8/dps8_eis.c N 9114 src/dps8/dps8_eis.c N 9154 src/dps8/dps8_eis.c N 9156 src/dps8/dps8_eis.c N 9177 src/dps8/dps8_eis.c N 9194 src/dps8/dps8_eis.c N 9201 src/dps8/dps8_eis.c static bool sign9n(word72 n128, int N) N 9211 src/dps8/dps8_eis.c if (N < 1 || N > 8) // XXX largest int we'll play with is 72-bits? Makes sense N 9215 src/dps8/dps8_eis.c word72 sgnmask = lshift_128 (construct_128 (0, 1), (uint) (N * 9 - 1)); N 9218 src/dps8/dps8_eis.c word72 sgnmask = (word72)1 << ((N * 9) - 1); N 9227 src/dps8/dps8_eis.c static word72s signExt9(word72 n128, int N) N 9234 src/dps8/dps8_eis.c int bits = (N * 9) - 1; N 9235 src/dps8/dps8_eis.c if (sign9n(n128, N)) N 9371 src/dps8/dps8_eis.c N 9378 src/dps8/dps8_eis.c N 9391 src/dps8/dps8_eis.c N 9404 src/dps8/dps8_eis.c N 9409 src/dps8/dps8_eis.c N 9416 src/dps8/dps8_eis.c N 9421 src/dps8/dps8_eis.c N 9863 src/dps8/dps8_eis.c N 9870 src/dps8/dps8_eis.c N 9876 src/dps8/dps8_eis.c N 9891 src/dps8/dps8_eis.c