u 194 src/decNumber/decNumber.c # define QUOT10(u, n) ((((uInt)(u)>>(n))*multies[n])>>17) u 3257 src/decNumber/decNumber.c uInt u=*up; // work u 3260 src/decNumber/decNumber.c *ub=(uByte)(u%10); // [*6554 trick inhibits, here] u 3261 src/decNumber/decNumber.c u=u/10; u 3265 src/decNumber/decNumber.c u=*up; u 3405 src/decNumber/decNumber.c uInt u, pow; // work u 3435 src/decNumber/decNumber.c u=*up; // contains DECDPUN digits to lay out u 3436 src/decNumber/decNumber.c for (; cut>=0; c++, cut--) TODIGIT(u, cut, c, pow); u 3474 src/decNumber/decNumber.c u=*up; u 3482 src/decNumber/decNumber.c u=*up; u 3484 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); u 3493 src/decNumber/decNumber.c u=*up; u 3495 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); u 3509 src/decNumber/decNumber.c u=*up; u 3511 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); u 3522 src/decNumber/decNumber.c u=e; // .. u 3525 src/decNumber/decNumber.c u=-e; // uInt, please u 3529 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); u 4221 src/decNumber/decNumber.c Unit *u; // work u 4231 src/decNumber/decNumber.c for (u=msu1; cut>=DECDPUN; cut-=DECDPUN, u--) *u=0; u 5943 src/decNumber/decNumber.c const Unit *l, *r, *u; // work u 5986 src/decNumber/decNumber.c for (u=acc; u<acc+accunits-1 && *u==0;) u++; u 5987 src/decNumber/decNumber.c result=(*u==0 ? 0 : +1); u 160 src/decNumber/decNumberLocal.h # define LONGMUL32HI(w, u, v) { \ u 162 src/decNumber/decNumberLocal.h u0=u & 0xffff; u1=u>>16; \ u 318 src/decNumber/decNumberLocal.h # define TODIGIT(u, cut, c, pow) { \ u 321 src/decNumber/decNumberLocal.h if ((u)>pow) { \ u 323 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=8;} \ u 325 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=4;} \ u 328 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=2;} \ u 330 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=1;} \ u 464 src/decNumber/decNumberLocal.h # define ISCOEFFZERO(u) ( \ u 465 src/decNumber/decNumberLocal.h UBTOUI((u)+DECPMAX-4)==0 \ u 466 src/decNumber/decNumberLocal.h && UBTOUS((u)+DECPMAX-6)==0 \ u 467 src/decNumber/decNumberLocal.h && *(u)==0) u 469 src/decNumber/decNumberLocal.h # define ISCOEFFZERO(u) ( \ u 470 src/decNumber/decNumberLocal.h UBTOUI((u)+DECPMAX-4)==0 \ u 471 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-8)==0 \ u 472 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-12)==0 \ u 473 src/decNumber/decNumberLocal.h && UBTOUI(u)==0) u 475 src/decNumber/decNumberLocal.h # define ISCOEFFZERO(u) ( \ u 476 src/decNumber/decNumberLocal.h UBTOUI((u)+DECPMAX-4)==0 \ u 477 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-8)==0 \ u 478 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-12)==0 \ u 479 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-16)==0 \ u 480 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-20)==0 \ u 481 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-24)==0 \ u 482 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-28)==0 \ u 483 src/decNumber/decNumberLocal.h && UBTOUI((u)+DECPMAX-32)==0 \ u 484 src/decNumber/decNumberLocal.h && UBTOUS(u)==0) u 515 src/decNumber/decNumberLocal.h # define dpd2bcd8(u, dpd) memcpy(u, &DPD2BCD8[((dpd)&0x3ff)*4], 4) u 516 src/decNumber/decNumberLocal.h # define dpd2bcd83(u, dpd) memcpy(u, &DPD2BCD8[((dpd)&0x3ff)*4], 3) u 391 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); u 395 src/dps8/dps8_append.c p->USE = u; u 658 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); // before loading the SDWAM! u 667 src/dps8/dps8_append.c p->USE = u; u 740 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); u 745 src/dps8/dps8_append.c p->USE = u; u 898 src/dps8/dps8_append.c word6 u = calc_hit_am (p->USE, toffset >> 4); // before loading the PTWAM u 909 src/dps8/dps8_append.c p->USE = u; u 1347 src/dps8/dps8_cable.c all (u, N_CPU_UNITS_MAX) all (prt, N_CPU_PORTS) u 1349 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; u 1351 src/dps8/dps8_cable.c cpus_used[u] = true; u 1358 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) all (prt, N_SCU_PORTS) u 1360 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; u 1362 src/dps8/dps8_cable.c scus_used[u] = true; u 1364 src/dps8/dps8_cable.c all (u, N_CPU_UNITS_MAX) all (prt, N_CPU_PORTS) u 1366 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; u 1375 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) all (prt, N_SCU_PORTS) u 1377 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; u 1418 src/dps8/dps8_cable.c all (u, N_ ## big ## _UNITS_MAX) all (prt, MAX_CTLR_PORTS) \ u 1420 src/dps8/dps8_cable.c struct ctlr_to_iom_s *p = &cables->small ## _to_iom[u][prt]; \ u 1423 src/dps8/dps8_cable.c #big, u, #shape, #color); \ u 1448 src/dps8/dps8_cable.c all (u, N_ ## to_big ## _UNITS_MAX) \ u 1451 src/dps8/dps8_cable.c &cables->to_small ## _to_ ## from_small[u]; \ u 1454 src/dps8/dps8_cable.c #to_label, u, #shape, #color); \ u 1465 src/dps8/dps8_cable.c all (u, N_CPU_UNITS_MAX) all (prt, N_CPU_PORTS) u 1467 src/dps8/dps8_cable.c struct cpu_to_scu_s *p = &cables->cpu_to_scu[u][prt]; u 1469 src/dps8/dps8_cable.c sim_printf (" CPU%c -- SCU%c;\n", u + 'A', u 1474 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) all (prt, N_SCU_PORTS) u 1476 src/dps8/dps8_cable.c struct scu_to_iom_s *p = &cables->scu_to_iom[u][prt]; u 1478 src/dps8/dps8_cable.c sim_printf (" SCU%c -- IOM%c;\n", u + 'A', u 1483 src/dps8/dps8_cable.c all (u, N_IOM_UNITS_MAX) all (c, MAX_CHANNELS) u 1485 src/dps8/dps8_cable.c struct iom_to_ctlr_s *p = &cables->iom_to_ctlr[u][c]; u 1487 src/dps8/dps8_cable.c sim_printf (" IOM%c -- %s%d;\n", u + 'A', u 1494 src/dps8/dps8_cable.c all (u, N_ ## to_big ## _UNITS_MAX) \ u 1497 src/dps8/dps8_cable.c &cables->to_small ## _to_ ## from_small[u]; \ u 1501 src/dps8/dps8_cable.c p->ctlr_unit_idx, #to_label, u); \ u 1518 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) u 1521 src/dps8/dps8_cable.c struct scu_to_iom_s * p = & cables->scu_to_iom[u][prt]; u 1523 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->iom_unit_idx, p->iom_port_num); u 1529 src/dps8/dps8_cable.c all (u, N_IOM_UNITS_MAX) u 1532 src/dps8/dps8_cable.c struct iom_to_scu_s * p = & cables->iom_to_scu[u][prt]; u 1534 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->scu_unit_idx, p->scu_port_num); u 1541 src/dps8/dps8_cable.c all (u, N_SCU_UNITS_MAX) u 1545 src/dps8/dps8_cable.c struct scu_to_cpu_s * p = & cables->scu_to_cpu[u][prt][sp]; u 1547 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->cpu_unit_idx, p->cpu_port_num); u 1553 src/dps8/dps8_cable.c all (u, N_CPU_UNITS_MAX) u 1556 src/dps8/dps8_cable.c struct cpu_to_scu_s * p = & cables->cpu_to_scu[u][prt]; u 1559 src/dps8/dps8_cable.c u, prt, p->scu_unit_idx, p->scu_port_num, p->scu_subport_num); u 1567 src/dps8/dps8_cable.c all (u, N_IOM_UNITS_MAX) u 1570 src/dps8/dps8_cable.c struct iom_to_ctlr_s * p = & cables->iom_to_ctlr[u][c]; u 1573 src/dps8/dps8_cable.c u, c, p->ctlr_unit_idx, p->port_num, ctlr_type_strs[p->ctlr_type], u 1582 src/dps8/dps8_cable.c all (u, N_ ## big ## _UNITS_MAX) \ u 1585 src/dps8/dps8_cable.c struct ctlr_to_iom_s * p = & cables->small ## _to_iom[u][prt]; \ u 1587 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %4u\n", u, prt, p->iom_unit_idx, p->chan_num); \ u 1618 src/dps8/dps8_cable.c all (u, N_ ## from_big ## _UNITS_MAX) \ u 1621 src/dps8/dps8_cable.c struct ctlr_to_dev_s * p = & cables->from_small ## _to_ ## to_small[u][prt]; \ u 1623 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %10p\n", u, prt, p->unit_idx, (void *) p->iom_cmd); \ u 1627 src/dps8/dps8_cable.c all (u, N_ ## to_big ## _UNITS_MAX) \ u 1629 src/dps8/dps8_cable.c struct dev_to_ctlr_s * p = & cables->to_small ## _to_ ## from_small[u]; \ u 1631 src/dps8/dps8_cable.c sim_printf (" %4u %4u %4u %5s\n", u, p->ctlr_unit_idx, \ u 1313 src/dps8/dps8_cpu.c for (uint u = 0; u < N_SCU_UNITS_MAX; u ++) u 1314 src/dps8/dps8_cpu.c cpu.sc_num_banks[u] = 0; u 229 src/dps8/dps8_decimal.c u 248 src/dps8/dps8_decimal.c u 252 src/dps8/dps8_decimal.c u 253 src/dps8/dps8_decimal.c u 254 src/dps8/dps8_decimal.c u 256 src/dps8/dps8_decimal.c u 257 src/dps8/dps8_decimal.c u 12165 src/dps8/dps8_eis.c u 12184 src/dps8/dps8_eis.c u 12188 src/dps8/dps8_eis.c u 12189 src/dps8/dps8_eis.c u 12190 src/dps8/dps8_eis.c u 12192 src/dps8/dps8_eis.c u 12193 src/dps8/dps8_eis.c u 274 src/dps8/dps8_math128.c static void mulmn (uint32_t w[], uint32_t u[], u 294 src/dps8/dps8_math128.c t = (uint64_t) u[i] * (uint64_t) v[j] + (uint64_t) w[i + j] + k; u 303 src/dps8/dps8_math128.c static void mulmns (uint32_t w[], uint32_t u[], u 306 src/dps8/dps8_math128.c mulmn (w, u, v, m, n); u 312 src/dps8/dps8_math128.c if ((int32_t)u[m - 1] < 0) u 327 src/dps8/dps8_math128.c int t = (int) w[i + n] - (int) u[i] - b; u 380 src/dps8/dps8_math128.c const uint16_t u[], const uint16_t v[], u 399 src/dps8/dps8_math128.c q[j] = (uint16_t) (((unsigned int) k*b + u[j])/v[0]); // divisor here. u 400 src/dps8/dps8_math128.c k = (int) (((unsigned int) k*b + u[j]) - q[j]*v[0]); u 420 src/dps8/dps8_math128.c un[m] = u[m-1] >> (16-s); u 422 src/dps8/dps8_math128.c un[i] = (uint16_t) (u[i] << s) | (uint16_t) (u[i-1] >> (16-s)); u 423 src/dps8/dps8_math128.c un[0] = (uint16_t) (u[0] << s); u 477 src/dps8/dps8_math128.c uint32_t w[l+l], u[l], v[l]; u 479 src/dps8/dps8_math128.c u[3] = (uint32_t) (a.h >> 32); u 480 src/dps8/dps8_math128.c u[2] = (uint32_t) a.h; u 481 src/dps8/dps8_math128.c u[1] = (uint32_t) (a.l >> 32); u 482 src/dps8/dps8_math128.c u[0] = (uint32_t) a.l; u 487 src/dps8/dps8_math128.c mulmn (w, u, v, l, l); u 497 src/dps8/dps8_math128.c uint32_t w[l+l], u[l], v[l]; u 499 src/dps8/dps8_math128.c u[3] = (uint32_t) (a.h >> 32); u 500 src/dps8/dps8_math128.c u[2] = (uint32_t) a.h; u 501 src/dps8/dps8_math128.c u[1] = (uint32_t) (a.l >> 32); u 502 src/dps8/dps8_math128.c u[0] = (uint32_t) a.l; u 507 src/dps8/dps8_math128.c mulmns (w, u, v, l, l); u 518 src/dps8/dps8_math128.c uint16_t q[m], u[m], v[n]; u 519 src/dps8/dps8_math128.c u[0] = (uint16_t) a.l; u 520 src/dps8/dps8_math128.c u[1] = (uint16_t) (a.l >> 16); u 521 src/dps8/dps8_math128.c u[2] = (uint16_t) (a.l >> 32); u 522 src/dps8/dps8_math128.c u[3] = (uint16_t) (a.l >> 48); u 523 src/dps8/dps8_math128.c u[4] = (uint16_t) a.h; u 524 src/dps8/dps8_math128.c u[5] = (uint16_t) (a.h >> 16); u 525 src/dps8/dps8_math128.c u[6] = (uint16_t) (a.h >> 32); u 526 src/dps8/dps8_math128.c u[7] = (uint16_t) (a.h >> 48); u 544 src/dps8/dps8_math128.c divmnu (q, remp ? r : NULL, u, v, m, normlen); u 573 src/dps8/dps8_math128.c uint16_t q[m], u[m], v[n]; u 574 src/dps8/dps8_math128.c u[0] = (uint16_t) a.l; u 575 src/dps8/dps8_math128.c u[1] = (uint16_t) (a.l >> 16); u 576 src/dps8/dps8_math128.c u[2] = (uint16_t) (a.l >> 32); u 577 src/dps8/dps8_math128.c u[3] = (uint16_t) (a.l >> 48); u 578 src/dps8/dps8_math128.c u[4] = (uint16_t) a.h; u 579 src/dps8/dps8_math128.c u[5] = (uint16_t) (a.h >> 16); u 580 src/dps8/dps8_math128.c u[6] = (uint16_t) (a.h >> 32); u 581 src/dps8/dps8_math128.c u[7] = (uint16_t) (a.h >> 48); u 587 src/dps8/dps8_math128.c divmnu (q, remp, u, v, m, n); u 609 src/dps8/dps8_math128.c uint16_t q[m], u[m], v[n], r[2]; u 610 src/dps8/dps8_math128.c u[0] = (uint16_t) a.l; u 611 src/dps8/dps8_math128.c u[1] = (uint16_t) (a.l >> 16); u 612 src/dps8/dps8_math128.c u[2] = (uint16_t) (a.l >> 32); u 613 src/dps8/dps8_math128.c u[3] = (uint16_t) (a.l >> 48); u 614 src/dps8/dps8_math128.c u[4] = (uint16_t) a.h; u 615 src/dps8/dps8_math128.c u[5] = (uint16_t) (a.h >> 16); u 616 src/dps8/dps8_math128.c u[6] = (uint16_t) (a.h >> 32); u 617 src/dps8/dps8_math128.c u[7] = (uint16_t) (a.h >> 48); u 624 src/dps8/dps8_math128.c divmnu (q, remp ? r : NULL, u, v, m, n); u 1042 src/dps8/dps8_math128.c TItype __multi3 (TItype u, TItype v) u 1047 src/dps8/dps8_math128.c if (u<0) u 1050 src/dps8/dps8_math128.c u = -u; u 1053 src/dps8/dps8_math128.c while (u != (TItype)0) u 1055 src/dps8/dps8_math128.c if ( u&(TItype)1 ) u 1057 src/dps8/dps8_math128.c u>>=1; u 2468 src/dps8/dps8_scu.c for (int u = 0; u < N_SCU_UNITS_MAX; u ++) u 2474 src/dps8/dps8_scu.c scu[u].ports[p].dev_port[s] = -1; u 2475 src/dps8/dps8_scu.c scu[u].ports[p].subport_enables[s] = false; u 2476 src/dps8/dps8_scu.c scu[u].ports[p].xipmask[s] = false; u 2478 src/dps8/dps8_scu.c scu[u].ports[p].xipmaskval = N_SCU_SUBPORTS; u 2480 src/dps8/dps8_scu.c scu[u].ports[p].type = ADEV_NONE; u 2481 src/dps8/dps8_scu.c scu[u].ports[p].is_exp = false; u 2487 src/dps8/dps8_scu.c scu [u].id = 02l; // 0b0010 u 2488 src/dps8/dps8_scu.c scu [u].mode_reg = 0; // used by T&D u 2489 src/dps8/dps8_scu.c scu [u].elapsed_days = 0; u 4536 src/simh/scp.c int32 u = (int32)(uptr - dptr->units); u 4540 src/simh/scp.c (void)fprintf (st, " %s%d \n", sim_dname (dptr), u); u 4542 src/simh/scp.c (void)fprintf (st, " %s%d ", sim_dname (dptr), u); u 7883 src/simh/scp.c uint32 i, u; u 7911 src/simh/scp.c u = (uint32) get_uint (tptr, 10, dptr->numunits - 1, &r); u 7915 src/simh/scp.c *uptr = dptr->units + u; u 7919 src/simh/scp.c for (u = 0; u < dptr->numunits; u++) { u 7920 src/simh/scp.c if (0 == strcmp (cptr, sim_uname (&dptr->units[u]))) { u 7921 src/simh/scp.c *uptr = &dptr->units[u]; u 352 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)