u 209 src/decNumber/decNumber.c # define QUOT10(u, n) ((((uInt)(u)>>(n))*multies[n])>>17) u 3273 src/decNumber/decNumber.c uInt u=*up; // work u 3276 src/decNumber/decNumber.c *ub=(uByte)(u%10); // [*6554 trick inhibits, here] u 3277 src/decNumber/decNumber.c u=u/10; u 3281 src/decNumber/decNumber.c u=*up; u 3422 src/decNumber/decNumber.c uInt u, pow; // work u 3452 src/decNumber/decNumber.c u=*up; // contains DECDPUN digits to lay out u 3453 src/decNumber/decNumber.c for (; cut>=0; c++, cut--) TODIGIT(u, cut, c, pow); u 3491 src/decNumber/decNumber.c u=*up; u 3499 src/decNumber/decNumber.c u=*up; u 3501 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); u 3510 src/decNumber/decNumber.c u=*up; u 3512 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); u 3526 src/decNumber/decNumber.c u=*up; u 3528 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); u 3539 src/decNumber/decNumber.c u=e; // .. u 3542 src/decNumber/decNumber.c u=-e; // uInt, please u 3546 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); u 4241 src/decNumber/decNumber.c Unit *u; // work u 4251 src/decNumber/decNumber.c for (u=msu1; cut>=DECDPUN; cut-=DECDPUN, u--) *u=0; u 5963 src/decNumber/decNumber.c const Unit *l, *r, *u; // work u 6006 src/decNumber/decNumber.c for (u=acc; u<acc+accunits-1 && *u==0;) u++; u 6007 src/decNumber/decNumber.c result=(*u==0 ? 0 : +1); u 158 src/decNumber/decNumberLocal.h # define LONGMUL32HI(w, u, v) { \ u 160 src/decNumber/decNumberLocal.h u0=u & 0xffff; u1=u>>16; \ u 316 src/decNumber/decNumberLocal.h # define TODIGIT(u, cut, c, pow) { \ u 319 src/decNumber/decNumberLocal.h if ((u)>pow) { \ u 321 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=8;} \ u 323 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=4;} \ u 326 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=2;} \ u 328 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=1;} \ u 462 src/decNumber/decNumberLocal.h # define ISCOEFFZERO(u) ( \ u 463 src/decNumber/decNumberLocal.h UBTOUI((u)+DECPMAX-4)==0 \ u 464 src/decNumber/decNumberLocal.h && UBTOUS((u)+DECPMAX-6)==0 \ u 465 src/decNumber/decNumberLocal.h && *(u)==0) u 467 src/decNumber/decNumberLocal.h # define ISCOEFFZERO(u) ( \ u 468 src/decNumber/decNumberLocal.h UBTOUI((u)+DECPMAX-4)==0 \ u 469 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-8)==0 \ u 470 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-12)==0 \ u 471 src/decNumber/decNumberLocal.h && UBTOUI(u)==0) u 473 src/decNumber/decNumberLocal.h # define ISCOEFFZERO(u) ( \ u 474 src/decNumber/decNumberLocal.h UBTOUI((u)+DECPMAX-4)==0 \ u 475 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-8)==0 \ u 476 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-12)==0 \ u 477 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-16)==0 \ u 478 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-20)==0 \ u 479 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-24)==0 \ u 480 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-28)==0 \ u 481 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-32)==0 \ u 482 src/decNumber/decNumberLocal.h && UBTOUS(u)==0) u 513 src/decNumber/decNumberLocal.h # define dpd2bcd8(u, dpd) memcpy(u, &DPD2BCD8[((dpd)&0x3ff)*4], 4) u 514 src/decNumber/decNumberLocal.h # define dpd2bcd83(u, dpd) memcpy(u, &DPD2BCD8[((dpd)&0x3ff)*4], 3) u 392 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); u 396 src/dps8/dps8_append.c p->USE = u; u 661 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); // before loading the SDWAM! u 670 src/dps8/dps8_append.c p->USE = u; u 743 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); u 748 src/dps8/dps8_append.c p->USE = u; u 901 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); // before loading the PTWAM u 912 src/dps8/dps8_append.c p->USE = u; u 1370 src/dps8/dps8_cable.c all (u, N_CPU_UNITS_MAX) all (prt, N_CPU_PORTS) u 1372 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; u 1374 src/dps8/dps8_cable.c cpus_used[u] = true; u 1381 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) all (prt, N_SCU_PORTS) u 1383 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; u 1385 src/dps8/dps8_cable.c scus_used[u] = true; u 1387 src/dps8/dps8_cable.c all (u, N_CPU_UNITS_MAX) all (prt, N_CPU_PORTS) u 1389 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; u 1398 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) all (prt, N_SCU_PORTS) u 1400 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; u 1441 src/dps8/dps8_cable.c all (u, N_ ## big ## _UNITS_MAX) all (prt, MAX_CTLR_PORTS) \ u 1443 src/dps8/dps8_cable.c struct ctlr_to_iom_s *p = &cables->small ## _to_iom[u][prt]; \ u 1446 src/dps8/dps8_cable.c #big, u, #shape, #color); \ u 1471 src/dps8/dps8_cable.c all (u, N_ ## to_big ## _UNITS_MAX) \ u 1474 src/dps8/dps8_cable.c &cables->to_small ## _to_ ## from_small[u]; \ u 1477 src/dps8/dps8_cable.c #to_label, u, #shape, #color); \ u 1488 src/dps8/dps8_cable.c all (u, N_CPU_UNITS_MAX) all (prt, N_CPU_PORTS) u 1490 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; u 1492 src/dps8/dps8_cable.c sim_printf (" CPU%c -- SCU%c;\n", u + 'A', u 1497 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) all (prt, N_SCU_PORTS) u 1499 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; u 1501 src/dps8/dps8_cable.c sim_printf (" SCU%c -- IOM%c;\n", u + 'A', u 1506 src/dps8/dps8_cable.c all (u, N_IOM_UNITS_MAX) all (c, MAX_CHANNELS) u 1508 src/dps8/dps8_cable.c struct iom_to_ctlr_s *p = &cables->iom_to_ctlr[u][c]; u 1510 src/dps8/dps8_cable.c sim_printf (" IOM%c -- %s%d;\n", u + 'A', u 1517 src/dps8/dps8_cable.c all (u, N_ ## to_big ## _UNITS_MAX) \ u 1520 src/dps8/dps8_cable.c &cables->to_small ## _to_ ## from_small[u]; \ u 1524 src/dps8/dps8_cable.c p->ctlr_unit_idx, #to_label, u); \ u 1541 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) u 1544 src/dps8/dps8_cable.c struct scu_to_iom_s * p = & cables->scu_to_iom[u][prt]; u 1546 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->iom_unit_idx, p->iom_port_num); u 1552 src/dps8/dps8_cable.c all (u, N_IOM_UNITS_MAX) u 1555 src/dps8/dps8_cable.c struct iom_to_scu_s * p = & cables->iom_to_scu[u][prt]; u 1557 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->scu_unit_idx, p->scu_port_num); u 1564 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) u 1568 src/dps8/dps8_cable.c struct scu_to_cpu_s * p = & cables->scu_to_cpu[u][prt][sp]; u 1570 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->cpu_unit_idx, p->cpu_port_num); u 1576 src/dps8/dps8_cable.c all (u, N_CPU_UNITS_MAX) u 1579 src/dps8/dps8_cable.c struct cpu_to_scu_s * p = & cables->cpu_to_scu[u][prt]; u 1582 src/dps8/dps8_cable.c u, prt, p->scu_unit_idx, p->scu_port_num, p->scu_subport_num); u 1590 src/dps8/dps8_cable.c all (u, N_IOM_UNITS_MAX) u 1593 src/dps8/dps8_cable.c struct iom_to_ctlr_s * p = & cables->iom_to_ctlr[u][c]; u 1596 src/dps8/dps8_cable.c u, c, p->ctlr_unit_idx, p->port_num, ctlr_type_strs[p->ctlr_type], u 1605 src/dps8/dps8_cable.c all (u, N_ ## big ## _UNITS_MAX) \ u 1608 src/dps8/dps8_cable.c struct ctlr_to_iom_s * p = & cables->small ## _to_iom[u][prt]; \ u 1610 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->iom_unit_idx, p->chan_num); \ u 1659 src/dps8/dps8_cable.c all (u, N_ ## from_big ## _UNITS_MAX) \ u 1662 src/dps8/dps8_cable.c struct ctlr_to_dev_s * p = & cables->from_small ## _to_ ## to_small[u][prt]; \ u 1664 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %10p\n", u, prt, p->unit_idx, (void *) p->iom_cmd); \ u 1668 src/dps8/dps8_cable.c all (u, N_ ## to_big ## _UNITS_MAX) \ u 1670 src/dps8/dps8_cable.c struct dev_to_ctlr_s * p = & cables->to_small ## _to_ ## from_small[u]; \ u 1672 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %5s\n", u, p->ctlr_unit_idx, \ u 1292 src/dps8/dps8_cpu.c for (uint u = 0; u < N_SCU_UNITS_MAX; u ++) u 1293 src/dps8/dps8_cpu.c cpu.sc_num_banks[u] = 0; u 228 src/dps8/dps8_decimal.c u 247 src/dps8/dps8_decimal.c u 251 src/dps8/dps8_decimal.c u 252 src/dps8/dps8_decimal.c u 253 src/dps8/dps8_decimal.c u 255 src/dps8/dps8_decimal.c u 256 src/dps8/dps8_decimal.c u 12037 src/dps8/dps8_eis.c u 12056 src/dps8/dps8_eis.c u 12060 src/dps8/dps8_eis.c u 12061 src/dps8/dps8_eis.c u 12062 src/dps8/dps8_eis.c u 12064 src/dps8/dps8_eis.c u 12065 src/dps8/dps8_eis.c u 277 src/dps8/dps8_math128.c static void mulmn (uint32_t w[], uint32_t u[], u 295 src/dps8/dps8_math128.c t = (uint64_t) u[i] * (uint64_t) v[j] + (uint64_t) w[i + j] + k; u 304 src/dps8/dps8_math128.c static void mulmns (uint32_t w[], uint32_t u[], u 307 src/dps8/dps8_math128.c mulmn (w, u, v, m, n); u 313 src/dps8/dps8_math128.c if ((int32_t)u[m - 1] < 0) u 328 src/dps8/dps8_math128.c int t = (int) w[i + n] - (int) u[i] - b; u 381 src/dps8/dps8_math128.c const uint16_t u[], const uint16_t v[], u 401 src/dps8/dps8_math128.c q[j] = (uint16_t) (((unsigned int) k*b + u[j])/v[0]); // divisor here. u 402 src/dps8/dps8_math128.c k = (int) (((unsigned int) k*b + u[j]) - q[j]*v[0]); u 422 src/dps8/dps8_math128.c un[m] = u[m-1] >> (16-s); u 424 src/dps8/dps8_math128.c un[i] = (uint16_t) (u[i] << s) | (uint16_t) (u[i-1] >> (16-s)); u 425 src/dps8/dps8_math128.c un[0] = (uint16_t) (u[0] << s); u 479 src/dps8/dps8_math128.c uint32_t w[l+l], u[l], v[l]; u 481 src/dps8/dps8_math128.c u[3] = (uint32_t) (a.h >> 32); u 482 src/dps8/dps8_math128.c u[2] = (uint32_t) a.h; u 483 src/dps8/dps8_math128.c u[1] = (uint32_t) (a.l >> 32); u 484 src/dps8/dps8_math128.c u[0] = (uint32_t) a.l; u 489 src/dps8/dps8_math128.c mulmn (w, u, v, l, l); u 499 src/dps8/dps8_math128.c uint32_t w[l+l], u[l], v[l]; u 501 src/dps8/dps8_math128.c u[3] = (uint32_t) (a.h >> 32); u 502 src/dps8/dps8_math128.c u[2] = (uint32_t) a.h; u 503 src/dps8/dps8_math128.c u[1] = (uint32_t) (a.l >> 32); u 504 src/dps8/dps8_math128.c u[0] = (uint32_t) a.l; u 509 src/dps8/dps8_math128.c mulmns (w, u, v, l, l); u 520 src/dps8/dps8_math128.c uint16_t q[m], u[m], v[n]; u 521 src/dps8/dps8_math128.c u[0] = (uint16_t) a.l; u 522 src/dps8/dps8_math128.c u[1] = (uint16_t) (a.l >> 16); u 523 src/dps8/dps8_math128.c u[2] = (uint16_t) (a.l >> 32); u 524 src/dps8/dps8_math128.c u[3] = (uint16_t) (a.l >> 48); u 525 src/dps8/dps8_math128.c u[4] = (uint16_t) a.h; u 526 src/dps8/dps8_math128.c u[5] = (uint16_t) (a.h >> 16); u 527 src/dps8/dps8_math128.c u[6] = (uint16_t) (a.h >> 32); u 528 src/dps8/dps8_math128.c u[7] = (uint16_t) (a.h >> 48); u 546 src/dps8/dps8_math128.c divmnu (q, remp ? r : NULL, u, v, m, normlen); u 575 src/dps8/dps8_math128.c uint16_t q[m], u[m], v[n]; u 576 src/dps8/dps8_math128.c u[0] = (uint16_t) a.l; u 577 src/dps8/dps8_math128.c u[1] = (uint16_t) (a.l >> 16); u 578 src/dps8/dps8_math128.c u[2] = (uint16_t) (a.l >> 32); u 579 src/dps8/dps8_math128.c u[3] = (uint16_t) (a.l >> 48); u 580 src/dps8/dps8_math128.c u[4] = (uint16_t) a.h; u 581 src/dps8/dps8_math128.c u[5] = (uint16_t) (a.h >> 16); u 582 src/dps8/dps8_math128.c u[6] = (uint16_t) (a.h >> 32); u 583 src/dps8/dps8_math128.c u[7] = (uint16_t) (a.h >> 48); u 589 src/dps8/dps8_math128.c divmnu (q, remp, u, v, m, n); u 611 src/dps8/dps8_math128.c uint16_t q[m], u[m], v[n], r[2]; u 612 src/dps8/dps8_math128.c u[0] = (uint16_t) a.l; u 613 src/dps8/dps8_math128.c u[1] = (uint16_t) (a.l >> 16); u 614 src/dps8/dps8_math128.c u[2] = (uint16_t) (a.l >> 32); u 615 src/dps8/dps8_math128.c u[3] = (uint16_t) (a.l >> 48); u 616 src/dps8/dps8_math128.c u[4] = (uint16_t) a.h; u 617 src/dps8/dps8_math128.c u[5] = (uint16_t) (a.h >> 16); u 618 src/dps8/dps8_math128.c u[6] = (uint16_t) (a.h >> 32); u 619 src/dps8/dps8_math128.c u[7] = (uint16_t) (a.h >> 48); u 626 src/dps8/dps8_math128.c divmnu (q, remp ? r : NULL, u, v, m, n); u 1050 src/dps8/dps8_math128.c TItype __multi3 (TItype u, TItype v) u 1055 src/dps8/dps8_math128.c if (u<0) u 1058 src/dps8/dps8_math128.c u = -u; u 1061 src/dps8/dps8_math128.c while (u != (TItype)0) u 1063 src/dps8/dps8_math128.c if ( u&(TItype)1 ) u 1065 src/dps8/dps8_math128.c u>>=1; u 2442 src/dps8/dps8_scu.c for (int u = 0; u < N_SCU_UNITS_MAX; u ++) u 2448 src/dps8/dps8_scu.c scu[u].ports[p].dev_port[s] = -1; u 2449 src/dps8/dps8_scu.c scu[u].ports[p].subport_enables[s] = false; u 2450 src/dps8/dps8_scu.c scu[u].ports[p].xipmask[s] = false; u 2452 src/dps8/dps8_scu.c scu[u].ports[p].xipmaskval = N_SCU_SUBPORTS; u 2454 src/dps8/dps8_scu.c scu[u].ports[p].type = ADEV_NONE; u 2455 src/dps8/dps8_scu.c scu[u].ports[p].is_exp = false; u 2461 src/dps8/dps8_scu.c scu [u].id = 02l; // 0b0010 u 2462 src/dps8/dps8_scu.c scu [u].mode_reg = 0; // used by T&D u 2463 src/dps8/dps8_scu.c scu [u].elapsed_days = 0; u 233 src/dps8/utarray.h # define utarray_renew(a,u) do { \ u 235 src/dps8/utarray.h else utarray_new((a),(u)); \ u 4233 src/simh/scp.c int32 u = (int32)(uptr - dptr->units); u 4237 src/simh/scp.c fprintf (st, " %s%d \n", sim_dname (dptr), u); u 4239 src/simh/scp.c fprintf (st, " %s%d ", sim_dname (dptr), u); u 7469 src/simh/scp.c uint32 i, u; u 7497 src/simh/scp.c u = (uint32) get_uint (tptr, 10, dptr->numunits - 1, &r); u 7501 src/simh/scp.c *uptr = dptr->units + u; u 7505 src/simh/scp.c for (u = 0; u < dptr->numunits; u++) { u 7506 src/simh/scp.c if (0 == strcmp (cptr, sim_uname (&dptr->units[u]))) { u 7507 src/simh/scp.c *uptr = &dptr->units[u]; u 342 src/simh/sim_defs.h t_stat (*boot)(int32 u, DEVICE *dp); u 60 src/simh/sim_disk.h # define DK_GET_FMT(u) (((u)->flags >> DKUF_V_FMT) & DKUF_M_FMT) u 97 src/simh/sim_tape.h # define MT_SET_PNU(u) (u)->flags = (u)->flags | MTUF_PNU u 98 src/simh/sim_tape.h # define MT_CLR_PNU(u) (u)->flags = (u)->flags & ~MTUF_PNU u 99 src/simh/sim_tape.h # define MT_TST_PNU(u) ((u)->flags & MTUF_PNU) u 100 src/simh/sim_tape.h # define MT_GET_FMT(u) (((u)->flags >> MTUF_V_FMT) & MTUF_M_FMT)