c 251 src/decNumber/decNumber.c # define decFinish(a,b,c,d) decFinalize(a,b,c,d) c 424 src/decNumber/decNumber.c const char *c; // work c 433 src/decNumber/decNumber.c for (c=chars;; c++) { // -> input character c 434 src/decNumber/decNumber.c if (*c>='0' && *c<='9') { // test for Arabic digit c 435 src/decNumber/decNumber.c last=c; c 439 src/decNumber/decNumber.c if (*c=='.' && dotchar==NULL) { // first '.' c 440 src/decNumber/decNumber.c dotchar=c; // record offset into decimal part c 441 src/decNumber/decNumber.c if (c==cfirst) cfirst++; // first digit must follow c 443 src/decNumber/decNumber.c if (c==chars) { // first in string... c 444 src/decNumber/decNumber.c if (*c=='-') { // valid - sign c 448 src/decNumber/decNumber.c if (*c=='+') { // valid + sign c 458 src/decNumber/decNumber.c if (*c=='\0') break; // and no more to come... c 466 src/decNumber/decNumber.c if (decBiStr(c, "infinity", "INFINITY") c 467 src/decNumber/decNumber.c || decBiStr(c, "inf", "INF")) { c 475 src/decNumber/decNumber.c if (*c=='s' || *c=='S') { // looks like an sNaN c 476 src/decNumber/decNumber.c c++; c 479 src/decNumber/decNumber.c if (*c!='n' && *c!='N') break; // check caseless "NaN" c 480 src/decNumber/decNumber.c c++; c 481 src/decNumber/decNumber.c if (*c!='a' && *c!='A') break; // .. c 482 src/decNumber/decNumber.c c++; c 483 src/decNumber/decNumber.c if (*c!='n' && *c!='N') break; // .. c 484 src/decNumber/decNumber.c c++; c 487 src/decNumber/decNumber.c for (cfirst=c; *cfirst=='0';) cfirst++; c 493 src/decNumber/decNumber.c for (c=cfirst;; c++, d++) { c 494 src/decNumber/decNumber.c if (*c<'0' || *c>'9') break; // test for Arabic digit c 495 src/decNumber/decNumber.c last=c; c 497 src/decNumber/decNumber.c if (*c!='\0') break; // not all digits c 509 src/decNumber/decNumber.c else if (*c!='\0') { // more to process... c 514 src/decNumber/decNumber.c if (*c!='e' && *c!='E') break; c 518 src/decNumber/decNumber.c c++; // to (possible) sign c 519 src/decNumber/decNumber.c if (*c=='-') {nege=1; c++;} c 520 src/decNumber/decNumber.c else if (*c=='+') c++; c 521 src/decNumber/decNumber.c if (*c=='\0') break; c 523 src/decNumber/decNumber.c for (; *c=='0' && *(c+1)!='\0';) c++; // strip insignificant zeros c 524 src/decNumber/decNumber.c firstexp=c; // save exponent digit place c 525 src/decNumber/decNumber.c for (; ;c++) { c 526 src/decNumber/decNumber.c if (*c<'0' || *c>'9') break; // not a digit c 527 src/decNumber/decNumber.c exponent=X10(exponent)+(Int)*c-(Int)'0'; c 530 src/decNumber/decNumber.c if (*c!='\0') break; c 535 src/decNumber/decNumber.c if (c>=firstexp+9+1) { c 536 src/decNumber/decNumber.c if (c>firstexp+9+1 || *firstexp>'1') exponent=DECNUMMAXE*2; c 548 src/decNumber/decNumber.c for (c=cfirst; c<last; c++, cfirst++) { c 549 src/decNumber/decNumber.c if (*c=='.') continue; // ignore dots c 550 src/decNumber/decNumber.c if (*c!='0') break; // non-zero found c 587 src/decNumber/decNumber.c for (c=cfirst;; c++) { // along the digits c 588 src/decNumber/decNumber.c if (*c=='.') continue; // ignore '.' [don't decrement cut] c 589 src/decNumber/decNumber.c out=X10(out)+(Int)*c-(Int)'0'; c 590 src/decNumber/decNumber.c if (c==last) break; // done [never get to trailing '.'] c 603 src/decNumber/decNumber.c for (c=last; c>=cfirst; c--) { // over each character, from least c 604 src/decNumber/decNumber.c if (*c=='.') continue; // ignore . [don't step up] c 605 src/decNumber/decNumber.c *up=(Unit)((Int)*c-(Int)'0'); c 3403 src/decNumber/decNumber.c char *c=string; // work [output pointer] c 3408 src/decNumber/decNumber.c *c='-'; c 3409 src/decNumber/decNumber.c c++; c 3413 src/decNumber/decNumber.c strcpy(c, "Inf"); c 3414 src/decNumber/decNumber.c strcpy(c+3, "inity"); c 3418 src/decNumber/decNumber.c *c='s'; c 3419 src/decNumber/decNumber.c c++; c 3421 src/decNumber/decNumber.c strcpy(c, "NaN"); c 3422 src/decNumber/decNumber.c c+=3; // step past c 3436 src/decNumber/decNumber.c for (; cut>=0; c++, cut--) TODIGIT(u, cut, c, pow); c 3439 src/decNumber/decNumber.c *c='\0'; // terminate the string c 3477 src/decNumber/decNumber.c for (; pre>0; pre--, c++, cut--) { c 3484 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); c 3487 src/decNumber/decNumber.c *c='.'; c++; c 3488 src/decNumber/decNumber.c for (;; c++, cut--) { c 3495 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); c 3498 src/decNumber/decNumber.c else for (; pre>0; pre--, c++) *c='0'; // 0 padding (for engineering) needed c 3501 src/decNumber/decNumber.c *c='0'; c++; c 3502 src/decNumber/decNumber.c *c='.'; c++; c 3503 src/decNumber/decNumber.c for (; pre<0; pre++, c++) *c='0'; // add any 0's after '.' c 3504 src/decNumber/decNumber.c for (; ; c++, cut--) { c 3511 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); c 3520 src/decNumber/decNumber.c *c='E'; c++; c 3521 src/decNumber/decNumber.c *c='+'; c++; // assume positive c 3524 src/decNumber/decNumber.c *(c-1)='-'; // oops, need - c 3529 src/decNumber/decNumber.c TODIGIT(u, cut, c, pow); c 3530 src/decNumber/decNumber.c if (*c=='0' && !had) continue; // skip leading zeros c 3532 src/decNumber/decNumber.c c++; // step for next c 3535 src/decNumber/decNumber.c *c='\0'; // terminate the string (all paths) c 6043 src/decNumber/decNumber.c Unit *c, Int m) { c 6045 src/decNumber/decNumber.c Unit *clsu=c; // C ditto c 6054 src/decNumber/decNumber.c maxC=c+alength; // A is usually the longer c 6055 src/decNumber/decNumber.c minC=c+blength; // .. and B the shorter c 6059 src/decNumber/decNumber.c if (a==c && bshift<=alength) { c 6060 src/decNumber/decNumber.c c+=bshift; c 6063 src/decNumber/decNumber.c else for (; c<clsu+bshift; a++, c++) { // copy needed c 6064 src/decNumber/decNumber.c if (a<alsu+alength) *c=*a; c 6065 src/decNumber/decNumber.c else *c=0; c 6078 src/decNumber/decNumber.c for (; c<minC; c++) { c 6085 src/decNumber/decNumber.c *c=(Unit)carry; c 6092 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder c 6094 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct c 6096 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; c 6102 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); c 6104 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK c 6106 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; c 6110 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder c 6112 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct c 6114 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; c 6120 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); c 6122 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK c 6124 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; c 6129 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder c 6136 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); c 6141 src/decNumber/decNumber.c *c=(Unit)(carry-(DECDPUNMAX+1)); // [helps additions] c 6146 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); c 6152 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); c 6159 src/decNumber/decNumber.c if (c<maxC) for (; c<maxC; c++) { c 6171 src/decNumber/decNumber.c *c=(Unit)carry; c 6179 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder c 6181 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct c 6183 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; c 6189 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); c 6191 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK c 6193 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; c 6197 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder c 6199 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // estimate was correct c 6201 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; c 6207 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); c 6209 src/decNumber/decNumber.c if (*c<DECDPUNMAX+1) continue; // was OK c 6211 src/decNumber/decNumber.c *c-=DECDPUNMAX+1; c 6215 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); // remainder c 6222 src/decNumber/decNumber.c *c=(Unit)(carry-est*(DECDPUNMAX+1)); c 6226 src/decNumber/decNumber.c *c=(Unit)(carry-(DECDPUNMAX+1)); c 6232 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); c 6238 src/decNumber/decNumber.c *c=(Unit)(carry%(DECDPUNMAX+1)); c 6245 src/decNumber/decNumber.c if (carry==0) return c-clsu; // no carry, so no more to do c 6247 src/decNumber/decNumber.c *c=(Unit)carry; // place as new unit c 6248 src/decNumber/decNumber.c c++; // .. c 6249 src/decNumber/decNumber.c return c-clsu; c 6253 src/decNumber/decNumber.c for (c=clsu; c<maxC; c++) { c 6254 src/decNumber/decNumber.c add=DECDPUNMAX+add-*c; c 6256 src/decNumber/decNumber.c *c=(Unit)add; c 6260 src/decNumber/decNumber.c *c=0; c 6266 src/decNumber/decNumber.c *c=(Unit)(add-carry-1); c 6267 src/decNumber/decNumber.c c++; // interesting, include it c 6269 src/decNumber/decNumber.c return clsu-c; // -ve result indicates borrowed c 318 src/decNumber/decNumberLocal.h # define TODIGIT(u, cut, c, pow) { \ c 319 src/decNumber/decNumberLocal.h *(c)='0'; \ c 323 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=8;} \ c 325 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=4;} \ c 328 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=2;} \ c 330 src/decNumber/decNumberLocal.h if ((u)>=pow) {(u)-=pow; *(c)+=1;} \ c 303 src/dps8/dps8.h # define max3(a,b,c) max((a), max((b),(c))) c 309 src/dps8/dps8.h # define min3(a,b,c) min((a), min((b),(c))) c 1483 src/dps8/dps8_cable.c all (u, N_IOM_UNITS_MAX) all (c, MAX_CHANNELS) c 1485 src/dps8/dps8_cable.c struct iom_to_ctlr_s *p = &cables->iom_to_ctlr[u][c]; c 1568 src/dps8/dps8_cable.c all (c, MAX_CHANNELS) c 1570 src/dps8/dps8_cable.c struct iom_to_ctlr_s * p = & cables->iom_to_ctlr[u][c]; c 1573 src/dps8/dps8_cable.c u, c, p->ctlr_unit_idx, p->port_num, ctlr_type_strs[p->ctlr_type], c 370 src/dps8/dps8_console.c static void ta_push (int c) c 380 src/dps8/dps8_console.c ta_buffer [ta_cnt ++] = c; c 387 src/dps8/dps8_console.c int c = ta_buffer[ta_next]; c 388 src/dps8/dps8_console.c return c; c 395 src/dps8/dps8_console.c int c = ta_buffer[ta_next ++]; c 398 src/dps8/dps8_console.c return c; c 759 src/dps8/dps8_console.c unsigned char c; c 764 src/dps8/dps8_console.c c = '!'; c 769 src/dps8/dps8_console.c c = '1'; c 776 src/dps8/dps8_console.c c = (unsigned char) (* csp->readp ++); c 777 src/dps8/dps8_console.c c = (unsigned char) toupper (c); c 780 src/dps8/dps8_console.c if (bcd_code_page[i] == c) c 784 src/dps8/dps8_console.c sim_warn ("Character %o does not map to BCD; replacing with '?'\n", c); c 797 src/dps8/dps8_console.c unsigned char c = (unsigned char) (* csp->readp ++); c 798 src/dps8/dps8_console.c c &= 0177; // Multics get consternated about this c 799 src/dps8/dps8_console.c putbits36_9 (bufp, charno * 9, c); c 831 src/dps8/dps8_console.c int c; c 837 src/dps8/dps8_console.c c = sim_poll_kbd (); c 838 src/dps8/dps8_console.c if (c == SCPE_OK) c 839 src/dps8/dps8_console.c c = accessGetChar (& csp->console_access); c 853 src/dps8/dps8_console.c if (breakEnable && c == SCPE_STOP) c 862 src/dps8/dps8_console.c if (breakEnable && c == SCPE_BREAK) c 871 src/dps8/dps8_console.c if (c == SCPE_OK) c 876 src/dps8/dps8_console.c if (c < SCPE_KFLAG) c 878 src/dps8/dps8_console.c sim_printf ("impossible %d %o\n", c, c); c 884 src/dps8/dps8_console.c int ch = c - SCPE_KFLAG; c 1068 src/dps8/dps8_console.c ta_push (c); c 1094 src/dps8/dps8_console.c unsigned char c = * (csp->autop); c 1095 src/dps8/dps8_console.c if (c == 4) // eot c 1109 src/dps8/dps8_console.c if (c == 030 || c == 031) // ^X ^Y c 1115 src/dps8/dps8_console.c if (c == 0) c 1129 src/dps8/dps8_console.c if (c == '\012' || c == '\015') c 1139 src/dps8/dps8_console.c * csp->tailp ++ = c; c 1141 src/dps8/dps8_console.c console_putchar (conUnitIdx, (char) c); c 1165 src/dps8/dps8_console.c c = ta_peek (); c 1168 src/dps8/dps8_console.c if (c == SCPE_OK) c 1172 src/dps8/dps8_console.c if (c < SCPE_KFLAG) c 1174 src/dps8/dps8_console.c sim_printf ("impossible %d %o\n", c, c); c 1180 src/dps8/dps8_console.c int ch = c - SCPE_KFLAG; c 2162 src/dps8/dps8_cpu.c uint c; c 2163 src/dps8/dps8_cpu.c for (c = 0; c < cpu_dev.numunits; c ++) c 2165 src/dps8/dps8_cpu.c set_cpu_idx (c); c 2169 src/dps8/dps8_cpu.c if (c == cpu_dev.numunits) c 1970 src/dps8/dps8_cpu.h static inline void SET_AR_CHAR_BITNO (cpu_state_t * restrict cpup, uint n, word2 c, word4 b) c 1972 src/dps8/dps8_cpu.h cpu.PAR[n].PR_BITNO = c * 9 + b; c 1974 src/dps8/dps8_cpu.h cpu.PAR[n].AR_CHAR = c & MASK2; c 1976 src/dps8/dps8_cpu.h #define SET_AR_CHAR_BITNO(n, c, b) SET_AR_CHAR_BITNO(cpup, n, c, b) c 584 src/dps8/dps8_crdpun.c char c = search_glyph_patterns(char_matrix); c 586 src/dps8/dps8_crdpun.c return c; c 593 src/dps8/dps8_crdpun.c char c = get_lace_char(buffer, c_pos); c 597 src/dps8/dps8_crdpun.c state -> glyph_buffer[current_length++] = c; c 214 src/dps8/dps8_eis.c static word36 put4 (word36 w, int pos, word4 c) c 221 src/dps8/dps8_eis.c c &= MASK4; c 226 src/dps8/dps8_eis.c return setbits36_5 (w, 0, c); c 229 src/dps8/dps8_eis.c return setbits36_4 (w, 5, c); c 233 src/dps8/dps8_eis.c return setbits36_5 (w, 9, c); c 236 src/dps8/dps8_eis.c return setbits36_4 (w, 14, c); c 240 src/dps8/dps8_eis.c return setbits36_5 (w, 18, c); c 243 src/dps8/dps8_eis.c return setbits36_4 (w, 23, c); c 247 src/dps8/dps8_eis.c return setbits36_5 (w, 27, c); c 250 src/dps8/dps8_eis.c return setbits36_4 (w, 32, c); c 257 src/dps8/dps8_eis.c static word36 put6 (word36 w, int pos, word6 c) c 263 src/dps8/dps8_eis.c return setbits36_6 (w, 0, c); c 267 src/dps8/dps8_eis.c return setbits36_6 (w, 6, c); c 271 src/dps8/dps8_eis.c return setbits36_6 (w, 12, c); c 275 src/dps8/dps8_eis.c return setbits36_6 (w, 18, c); c 279 src/dps8/dps8_eis.c return setbits36_6 (w, 24, c); c 283 src/dps8/dps8_eis.c return setbits36_6 (w, 30, c); c 291 src/dps8/dps8_eis.c static word36 put9 (word36 w, int pos, word9 c) c 297 src/dps8/dps8_eis.c return setbits36_9 (w, 0, c); c 301 src/dps8/dps8_eis.c return setbits36_9 (w, 9, c); c 305 src/dps8/dps8_eis.c return setbits36_9 (w, 18, c); c 309 src/dps8/dps8_eis.c return setbits36_9 (w, 27, c); c 939 src/dps8/dps8_eis.c word9 c = 0; c 947 src/dps8/dps8_eis.c c = (word9) get4 (data, (int) residue); c 951 src/dps8/dps8_eis.c c = (word9) get6 (data, (int) residue); c 955 src/dps8/dps8_eis.c c = get9 (data, (int) residue); c 959 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISGet469 : k: %u TAk %u coffset %u c %o \n", k, cpu.du.TAk[k - 1], residue, c); c 961 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "EISGet469 : k: %u TAk %u coffset %u c %o \n", k, e -> TA [k - 1], residue, c); c 964 src/dps8/dps8_eis.c return c; c 1050 src/dps8/dps8_eis.c word9 c = 0; c 1054 src/dps8/dps8_eis.c c = get4 (p -> data, * pos); c 1057 src/dps8/dps8_eis.c c = get9 (p -> data, * pos); c 1062 src/dps8/dps8_eis.c return c; c 3643 src/dps8/dps8_eis.c word9 c = ((~mask) & (yCharn1 ^ ctest)) & 0777; c 3644 src/dps8/dps8_eis.c if (c == 0) c 3814 src/dps8/dps8_eis.c word9 c = ((~mask) & (yCharn1 ^ ctest)) & 0777; c 3815 src/dps8/dps8_eis.c if (c == 0) c 3840 src/dps8/dps8_eis.c c 3842 src/dps8/dps8_eis.c c 3845 src/dps8/dps8_eis.c c 3860 src/dps8/dps8_eis.c static word9 xlate (cpu_state_t * cpup, EISaddr * xlatTbl, uint dstTA, uint c) c 3862 src/dps8/dps8_eis.c uint idx = (c / 4) & 0177; // max 128-words (7-bit index) c 3865 src/dps8/dps8_eis.c uint pos9 = c % 4; // lower 2-bits c 4028 src/dps8/dps8_eis.c word9 c = EISget469 (cpup, 1, cpu.du.CHTALLY); // get src char c 4035 src/dps8/dps8_eis.c m = c & 017; // truncate upper 2-bits c 4038 src/dps8/dps8_eis.c m = c & 077; // truncate upper 3-bits c 4041 src/dps8/dps8_eis.c m = c; // keep all 9-bits c 4224 src/dps8/dps8_eis.c word9 c = EISget469 (cpup, 1, limit - cpu.du.CHTALLY - 1); // get src char c 4231 src/dps8/dps8_eis.c m = c & 017; // truncate upper 2-bits c 4234 src/dps8/dps8_eis.c m = c & 077; // truncate upper 3-bits c 4237 src/dps8/dps8_eis.c m = c; // keep all 9-bits c 4279 src/dps8/dps8_eis.c c 4284 src/dps8/dps8_eis.c c 4303 src/dps8/dps8_eis.c static bool isGBCDOvp (uint c, bool * isNeg) c 4305 src/dps8/dps8_eis.c if (c & 020) c 4310 src/dps8/dps8_eis.c if (c & 040) c 4640 src/dps8/dps8_eis.c word9 c = EISget469 (cpup, 1, cpu.du.CHTALLY); // get src char c 4648 src/dps8/dps8_eis.c EISput469 (cpup, 2, cpu.du.CHTALLY, c); c 4654 src/dps8/dps8_eis.c cout = c; c 4661 src/dps8/dps8_eis.c cout = c & 017; // truncate upper 2-bits c 4671 src/dps8/dps8_eis.c cout = c & 017; // truncate upper 5-bits c 4674 src/dps8/dps8_eis.c cout = c & 077; // truncate upper 3-bits c 4690 src/dps8/dps8_eis.c isGBCDOvp (c, & isNeg); c 4940 src/dps8/dps8_eis.c word9 c = EISget469 (cpup, 1, e -> N1 - cpu.du.CHTALLY - 1); // get src char c 4948 src/dps8/dps8_eis.c EISput469 (cpup, 2, e -> N2 - cpu.du.CHTALLY - 1, c); c 4954 src/dps8/dps8_eis.c cout = c; c 4961 src/dps8/dps8_eis.c cout = c & 017; // truncate upper 2-bits c 4971 src/dps8/dps8_eis.c cout = c & 017; // truncate upper 5-bits c 4974 src/dps8/dps8_eis.c cout = c & 077; // truncate upper 3-bits c 4990 src/dps8/dps8_eis.c isGBCDOvp (c, & isNeg); c 5048 src/dps8/dps8_eis.c #define isDecimalZero(c) ((e->srcTA == CTA9) ? \ c 5049 src/dps8/dps8_eis.c ((c) == '0') : \ c 5050 src/dps8/dps8_eis.c (((c) & 017) == 0)) c 5081 src/dps8/dps8_eis.c word9 c = EISget49(cpup, a, &pos, TN); c 5082 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "src: %d: %o\n", n, c); c 5114 src/dps8/dps8_eis.c c &= 0xf; // hack off all but lower 4 bits c 5116 src/dps8/dps8_eis.c if (c < 012 || c > 017) //-V560 c 5122 src/dps8/dps8_eis.c if (c == 015) // '-' c 5129 src/dps8/dps8_eis.c e->exponent = (signed char)(c & 0377); // want to do a sign extend c 5134 src/dps8/dps8_eis.c e->exponent = (c & 0xf);// << 4; c 5140 src/dps8/dps8_eis.c e->exponent |= (c & 0xf); c 5149 src/dps8/dps8_eis.c c &= 0xf; // hack off all but lower 4 bits c 5150 src/dps8/dps8_eis.c if (c > 011) // TODO: generate ill proc fault c 5153 src/dps8/dps8_eis.c *p++ = c; // store 4-bit char in buffer c 5161 src/dps8/dps8_eis.c c &= 0xf; // hack off all but lower 4 bits c 5165 src/dps8/dps8_eis.c if (c < 012 || c > 017) //-V560 // TODO: generate ill proc fault c 5168 src/dps8/dps8_eis.c if (c == 015) // '-' c 5174 src/dps8/dps8_eis.c if (c > 011) //-V560 c 5176 src/dps8/dps8_eis.c *p++ = c; // store 4-bit char in buffer c 5181 src/dps8/dps8_eis.c c &= 0xf; // hack off all but lower 4 bits c 5185 src/dps8/dps8_eis.c if (c < 012 || c > 017) //-V560 c 5187 src/dps8/dps8_eis.c if (c == 015) // '-' c 5193 src/dps8/dps8_eis.c if (c > 011) c 5195 src/dps8/dps8_eis.c *p++ = c; // store 4-bit char in buffer c 5200 src/dps8/dps8_eis.c c &= 0xf; // hack off all but lower 4 bits c 5202 src/dps8/dps8_eis.c *p++ = c; // the "easy" one c 5239 src/dps8/dps8_eis.c word9 c = EISget469 (cpup, k, n); c 5240 src/dps8/dps8_eis.c * p ++ = c; c 5545 src/dps8/dps8_eis.c word9 c = EISget49(cpup, &e->ADDR2, &e->mopPos, CTN9); c 5547 src/dps8/dps8_eis.c word9 c = EISget49(cpup, e->mopAddress, &e->mopPos, CTN9); c 5549 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, 9, e->dstSZ, c); c 5584 src/dps8/dps8_eis.c c 5586 src/dps8/dps8_eis.c c 5588 src/dps8/dps8_eis.c c 5948 src/dps8/dps8_eis.c word9 c = *(e->in); c 5949 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "MFLC c %d (0%o)\n", c, c); c 5953 src/dps8/dps8_eis.c if (isDecimalZero (c)) { c 5967 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 5977 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 5979 src/dps8/dps8_eis.c if (! isDecimalZero (c)) c 6044 src/dps8/dps8_eis.c word9 c = *(e->in); c 6045 src/dps8/dps8_eis.c sim_debug (DBG_TRACEEXT, & cpu_dev, "MFLS n %d c %o\n", n, c); c 6047 src/dps8/dps8_eis.c if (isDecimalZero (c)) c 6081 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 6098 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 6106 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 6108 src/dps8/dps8_eis.c if (! isDecimalZero (c)) c 6161 src/dps8/dps8_eis.c word9 c = (*e->in | (!e->mopSN ? e->editInsertionTable[2] : e->editInsertionTable[3])); c 6167 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 6270 src/dps8/dps8_eis.c word9 c = *(e->in); c 6273 src/dps8/dps8_eis.c if (c & e->editInsertionTable[2]) // XXX only lower 4-bits are considered c 6276 src/dps8/dps8_eis.c else if (c & e->editInsertionTable[3]) // XXX only lower 4-bits are considered c 6285 src/dps8/dps8_eis.c if (! isDecimalZero (c)) c 6287 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 6316 src/dps8/dps8_eis.c word9 c = *e->in; c 6322 src/dps8/dps8_eis.c if (!e->mopES && isDecimalZero (c)) c 6331 src/dps8/dps8_eis.c else if ((! e->mopES) && (! isDecimalZero (c))) c 6336 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 6342 src/dps8/dps8_eis.c if (! isDecimalZero (c)) c 6344 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 6382 src/dps8/dps8_eis.c word9 c = *e->in; c 6388 src/dps8/dps8_eis.c if ((!e->mopES) && isDecimalZero (c)) c 6397 src/dps8/dps8_eis.c if ((! e->mopES) && (! isDecimalZero (c))) c 6402 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 6408 src/dps8/dps8_eis.c if (! isDecimalZero (c)) c 6410 src/dps8/dps8_eis.c writeToOutputBuffer(cpup, &e->out, e->srcSZ, e->dstSZ, c); c 7243 src/dps8/dps8_eis.c word9 c = EISget469(cpup, 1, cpu.du.CHTALLY); // get src char c 7251 src/dps8/dps8_eis.c EISput469(cpup, 2, cpu.du.CHTALLY, xlate (cpup, &e->ADDR3, dstTA, c)); c 7257 src/dps8/dps8_eis.c cidx = c; c 9797 src/dps8/dps8_eis.c c 9801 src/dps8/dps8_eis.c c 9804 src/dps8/dps8_eis.c c 9808 src/dps8/dps8_eis.c c 9811 src/dps8/dps8_eis.c c 9820 src/dps8/dps8_eis.c c 9842 src/dps8/dps8_eis.c c 9863 src/dps8/dps8_eis.c c 9884 src/dps8/dps8_eis.c c 9901 src/dps8/dps8_eis.c c 1247 src/dps8/dps8_fnp2.c unsigned char c = linep->inBuffer [linep->inUsed ++]; c 1262 src/dps8/dps8_fnp2.c linep->buffer[linep->nPos++] = c; c 1266 src/dps8/dps8_fnp2.c if (processInputCharacter (linep, c, eob)) c 2618 src/dps8/dps8_fnp2.c c 2620 src/dps8/dps8_fnp2.c c 2623 src/dps8/dps8_fnp2.c c 2625 src/dps8/dps8_fnp2.c c 7269 src/dps8/dps8_ins.c word1 c = (i->address >> 7) & 1; c 7270 src/dps8/dps8_ins.c if (c) c 7284 src/dps8/dps8_ins.c uint c = (i->address >> 7) & 1; c 7286 src/dps8/dps8_ins.c if (c) c 7300 src/dps8/dps8_ins.c uint c = (i->address >> 7) & 1; c 7302 src/dps8/dps8_ins.c if (c) c 9547 src/dps8/dps8_ins.c c 9548 src/dps8/dps8_ins.c c 9549 src/dps8/dps8_ins.c c 9554 src/dps8/dps8_ins.c c 9555 src/dps8/dps8_ins.c c 9556 src/dps8/dps8_ins.c c 9558 src/dps8/dps8_ins.c c 9563 src/dps8/dps8_ins.c c 9564 src/dps8/dps8_ins.c c 9566 src/dps8/dps8_ins.c c 9567 src/dps8/dps8_ins.c c 9569 src/dps8/dps8_ins.c c 2019 src/dps8/dps8_iom.c uint c = * cnt; c 2021 src/dps8/dps8_iom.c if (c == 0) c 2044 src/dps8/dps8_iom.c c --; c 2047 src/dps8/dps8_iom.c uint c = 0; c 2072 src/dps8/dps8_iom.c c ++; c 2074 src/dps8/dps8_iom.c * cnt = c; c 781 src/dps8/dps8_mgp.c chop_name(uint c) c 783 src/dps8/dps8_mgp.c if (( c > 0 ) && ( c <= CHOP_BRD )) c 785 src/dps8/dps8_mgp.c return chop_names[c]; c 787 src/dps8/dps8_mgp.c else if (c == CHOP_ACK) c 791 src/dps8/dps8_mgp.c else if (c >= 0200) //-V536 /* Decimal: 128; Octal: 0200 */ c 75 src/dps8/hdbg.h # define HDBGMRead(a, d, c) hdbgMRead (a, d, c) c 76 src/dps8/hdbg.h # define HDBGMWrite(a, d, c) hdbgMWrite (a, d, c) c 77 src/dps8/hdbg.h # define HDBGIEFP(t, s, o, c) hdbgIEFP (t, s, o, c); c 78 src/dps8/hdbg.h # define HDBGAPURead(s, o, f, d, c) hdbgAPURead (s, o, f, d, c) c 79 src/dps8/hdbg.h # define HDBGAPUWrite(s, o, f, d, c) hdbgAPUWrite (s, o, f, d, c) c 80 src/dps8/hdbg.h # define HDBGRegAR(c) hdbgRegR (hreg_A, cpu.rA, c) c 81 src/dps8/hdbg.h # define HDBGRegAW(c) hdbgRegW (hreg_A, cpu.rA, c) c 82 src/dps8/hdbg.h # define HDBGRegQR(c) hdbgRegR (hreg_Q, cpu.rQ, c) c 83 src/dps8/hdbg.h # define HDBGRegQW(c) hdbgRegW (hreg_Q, cpu.rQ, c) c 84 src/dps8/hdbg.h # define HDBGRegXR(i, c) hdbgRegR (hreg_X0+(i), (word36) cpu.rX[i], c) c 85 src/dps8/hdbg.h # define HDBGRegXW(i, c) hdbgRegW (hreg_X0+(i), (word36) cpu.rX[i], c) c 86 src/dps8/hdbg.h # define HDBGRegYR(c) hdbgRegR (hreg_Y, (word36) cpu.rY, c) c 87 src/dps8/hdbg.h # define HDBGRegYW(c) hdbgRegW (hreg_Y, (word36) cpu.rY, c) c 88 src/dps8/hdbg.h # define HDBGRegZR(r, c) hdbgRegR (hreg_Z, (word36) r, c) c 89 src/dps8/hdbg.h # define HDBGRegZW(r, c) hdbgRegW (hreg_Z, (word36) r, c) c 90 src/dps8/hdbg.h # define HDBGRegPRR(i, c) hdbgPARegR (hreg_PR0+(i), & cpu.PAR[i], c) c 91 src/dps8/hdbg.h # define HDBGRegPRW(i, c) hdbgPARegW (hreg_PR0+(i), & cpu.PAR[i], c) c 92 src/dps8/hdbg.h # define HDBGRegARR(i, c) hdbgPARegR (hreg_AR0+(i), & cpu.PAR[i], c) c 93 src/dps8/hdbg.h # define HDBGRegARW(i, c) hdbgPARegW (hreg_AR0+(i), & cpu.PAR[i], c) c 94 src/dps8/hdbg.h # define HDBGRegIR(c) hdbgRegW (hreg_IR, (word36) cpu.cu.IR, c) c 95 src/dps8/hdbg.h # define HDBGTrace(c) hdbgTrace(c) c 96 src/dps8/hdbg.h # define HDBGIntr(i, c) hdbgIntr(i, c) c 97 src/dps8/hdbg.h # define HDBGIntrSet(i, c, s, ctx) hdbgIntrSet(i, c, s, ctx) c 98 src/dps8/hdbg.h # define HDBGFault(n, s, m, c) hdbgFault(n, s, m, c) c 481 src/dps8/libtelnet.c char *c, *last, *out; c 531 src/dps8/libtelnet.c for (c = buffer + 1; c < buffer + size; ++c) { c 532 src/dps8/libtelnet.c if (*c == TELNET_ENVIRON_VAR || *c == TELNET_ENVIRON_USERVAR) { c 534 src/dps8/libtelnet.c } else if (*c == TELNET_ENVIRON_ESC) { c 536 src/dps8/libtelnet.c ++c; c 550 src/dps8/libtelnet.c c = buffer + 1; c 553 src/dps8/libtelnet.c values[eindex].type = (unsigned char) (*c++); c 558 src/dps8/libtelnet.c while (c < buffer + size) { c 560 src/dps8/libtelnet.c if ((unsigned)*c == TELNET_ENVIRON_VAR || c 561 src/dps8/libtelnet.c (unsigned)*c == TELNET_ENVIRON_VALUE || c 562 src/dps8/libtelnet.c (unsigned)*c == TELNET_ENVIRON_USERVAR) { c 567 src/dps8/libtelnet.c if (*c == TELNET_ENVIRON_ESC) { c 568 src/dps8/libtelnet.c ++c; c 571 src/dps8/libtelnet.c *out++ = *c++; c 581 src/dps8/libtelnet.c if (c < buffer + size && *c == TELNET_ENVIRON_VALUE) { c 582 src/dps8/libtelnet.c ++c; c 584 src/dps8/libtelnet.c while (c < buffer + size) { c 586 src/dps8/libtelnet.c if ((unsigned)*c == TELNET_ENVIRON_VAR || c 587 src/dps8/libtelnet.c (unsigned)*c == TELNET_ENVIRON_USERVAR) { c 592 src/dps8/libtelnet.c if (*c == TELNET_ENVIRON_ESC) { c 593 src/dps8/libtelnet.c ++c; c 596 src/dps8/libtelnet.c *out++ = *c++; c 1181 src/dps8/panelScraper.c int r, c; c 1186 src/dps8/panelScraper.c for (c = 0; c < ncols; c ++) c 1188 src/dps8/panelScraper.c int c2 = (c + c_offset) % nbits; c 1193 src/dps8/panelScraper.c banks [r + start_row] [c] = !!bit1; c 132 src/dps8/ucache.c # define args(a, b, c) a, b, c, pct (a, (b + c)) c 688 src/dps8/uvutil.c unsigned char c = access->inBuffer[access->inUsed ++]; c 699 src/dps8/uvutil.c return (int) c + SCPE_KFLAG; c 471 src/libsir/include/sir/helpers.h for (const char* c = str; *c; c++) { c 472 src/libsir/include/sir/helpers.h hash ^= (uint64_t)(unsigned char)(*c); c 482 src/libsir/include/sir/helpers.h void* _sir_explicit_memset(void *ptr, int c, size_t len); c 499 src/libsir/include/sir/helpers.h char* _sir_strredact(char *str, const char *sub, const char c); c 504 src/libsir/include/sir/helpers.h char* _sir_strreplace(char *str, const char c, const char n); c 510 src/libsir/include/sir/helpers.h size_t _sir_strcreplace(char *str, const char c, const char n, int32_t max); c 236 src/libsir/include/sir/impl.h char c, sc; c 239 src/libsir/include/sir/impl.h if ((c = *find++) != 0) { c 240 src/libsir/include/sir/impl.h c = (char)tolower((unsigned char)c); c 246 src/libsir/include/sir/impl.h } while ((char)tolower((unsigned char)sc) != c); c 104 src/libsir/include/sir/platform_importc.h # define __builtin___snprintf_chk(s, c, flag, os, fmt, ...) snprintf(s, c, fmt, __VA_ARGS__) c 108 src/libsir/include/sir/platform_importc.h # define __builtin___vsnprintf_chk(s, c, flag, os, fmt, ...) vsnprintf(s, c, fmt, __VA_ARGS__) c 332 src/libsir/src/sirhelpers.c # define _sir_explicit_memset_impl(s, c, n) memset(s, c, n) c 334 src/libsir/src/sirhelpers.c void* _sir_explicit_memset(void* ptr, int c, size_t len) c 336 src/libsir/src/sirhelpers.c return _sir_explicit_memset_impl(ptr, c, len); c 379 src/libsir/src/sirhelpers.c char* _sir_strredact(char *str, const char *sub, const char c) { c 388 src/libsir/src/sirhelpers.c if (!c || !p) c 391 src/libsir/src/sirhelpers.c (void)_sir_explicit_memset(p, c, strnlen(sub, strlen(str))); c 393 src/libsir/src/sirhelpers.c return _sir_strredact(str, sub, c); c 396 src/libsir/src/sirhelpers.c char* _sir_strreplace(char *str, const char c, const char n) { c 402 src/libsir/src/sirhelpers.c if (!c || !n) c 405 src/libsir/src/sirhelpers.c while ((i = strchr(i, c)) != NULL) c 411 src/libsir/src/sirhelpers.c size_t _sir_strcreplace(char *str, const char c, const char n, int32_t max) { c 415 src/libsir/src/sirhelpers.c if (!str || !c || !n || !max) c 418 src/libsir/src/sirhelpers.c while (cnt < (size_t)max && (i = strchr(i, c)) != NULL) { c 450 src/simh/linehistory.c char c = 0; c 480 src/simh/linehistory.c nread = read(ls->ifd, &c, 1); c 487 src/simh/linehistory.c switch (c) c 514 src/simh/linehistory.c return ( c ); /* Return last read character */ c 905 src/simh/linehistory.c linenoiseEditInsert(struct linenoiseState *l, char c) c 911 src/simh/linehistory.c l->buf[l->pos] = c; c 919 src/simh/linehistory.c char d = ( maskmode == 1 ) ? '*' : (char)c; c 936 src/simh/linehistory.c l->buf[l->pos] = c; c 1315 src/simh/linehistory.c signed char c; c 1319 src/simh/linehistory.c nread = read(l.ifd, &c, 1); c 1333 src/simh/linehistory.c if (c == 9 && completionCallback != NULL) c 1348 src/simh/linehistory.c c = (char)cint; c 1353 src/simh/linehistory.c switch (c) c 1510 src/simh/linehistory.c if (linenoiseEditInsert(&l, c)) c 1617 src/simh/linehistory.c int c = fgetc(stdin); c 1618 src/simh/linehistory.c if (c == EOF || c == '\n') c 1620 src/simh/linehistory.c if (c == EOF && len == 0) c 1633 src/simh/linehistory.c line[len] = c; c 2836 src/simh/scp.c char cbuf[4*CBUFSIZE], gbuf[CBUFSIZE], abuf[4*CBUFSIZE], quote, *c, *do_arg[11]; c 2859 src/simh/scp.c c = abuf; c 2862 src/simh/scp.c while (sim_isspace (*c)) /* skip blanks */ c 2863 src/simh/scp.c c++; c 2864 src/simh/scp.c if (*c == 0) /* all done? */ c 2867 src/simh/scp.c if (*c == '\'' || *c == '"') /* quoted string? */ c 2868 src/simh/scp.c quote = *c++; c 2870 src/simh/scp.c do_arg[nargs++] = c; /* save start */ c 2871 src/simh/scp.c while (*c && (quote ? (*c != quote) : !sim_isspace (*c))) c 2872 src/simh/scp.c c++; c 2873 src/simh/scp.c if (*c) /* term at quote/spc */ c 2874 src/simh/scp.c *c++ = 0; c 7435 src/simh/scp.c int sim_isspace (char c) c 7437 src/simh/scp.c return (c & 0x80) ? 0 : isspace (c); c 7440 src/simh/scp.c int sim_islower (char c) c 7442 src/simh/scp.c return (c & 0x80) ? 0 : islower (c); c 7445 src/simh/scp.c int sim_isalpha (char c) c 7447 src/simh/scp.c return (c & 0x80) ? 0 : isalpha (c); c 7450 src/simh/scp.c int sim_isprint (char c) c 7452 src/simh/scp.c return (c & 0x80) ? 0 : isprint (c); c 7455 src/simh/scp.c int sim_isdigit (char c) c 7457 src/simh/scp.c return (c & 0x80) ? 0 : isdigit (c); c 7460 src/simh/scp.c int sim_isgraph (char c) c 7462 src/simh/scp.c return (c & 0x80) ? 0 : isgraph (c); c 7465 src/simh/scp.c int sim_isalnum (char c) c 7467 src/simh/scp.c return (c & 0x80) ? 0 : isalnum (c); c 7653 src/simh/scp.c const char *c; c 7657 src/simh/scp.c c = strchr (hex_digits, toupper(*iptr)); c 7658 src/simh/scp.c if (c) { c 7659 src/simh/scp.c *optr = ((*optr)<<4) + (uint8)(c-hex_digits); c 7662 src/simh/scp.c c = strchr (hex_digits, toupper(*iptr)); c 7663 src/simh/scp.c if (c) { c 7664 src/simh/scp.c *optr = ((*optr)<<4) + (uint8)(c-hex_digits); c 8211 src/simh/scp.c int32 c; c 8224 src/simh/scp.c for (logop = cmpop = invalid_op; (c = *cptr++); ) { /* loop thru clauses */ c 8225 src/simh/scp.c if ((sptr = strchr (logstr, c))) { /* check for mask */ c 8232 src/simh/scp.c else if ((sptr = strchr (cmpstr, c))) { /* check for boolop */ c 8276 src/simh/scp.c int32 c; c 8292 src/simh/scp.c for (logop = cmpop = invalid_op; (c = *cptr++); ) { /* loop thru clauses */ c 8293 src/simh/scp.c if (NULL != (sptr = strchr (logstr, c))) { /* check for mask */ c 8303 src/simh/scp.c else if (NULL != (sptr = strchr (cmpstr, c))) { /* check for boolop */ c 8463 src/simh/scp.c uint32 c, digit; c 8472 src/simh/scp.c for (c = *inptr; sim_isalnum(c); c = *++inptr) { /* loop through char */ c 8473 src/simh/scp.c if (sim_islower (c)) c 8474 src/simh/scp.c c = toupper (c); c 8475 src/simh/scp.c if (sim_isdigit (c)) /* digit? */ c 8476 src/simh/scp.c digit = c - (uint32) '0'; c 8479 src/simh/scp.c else digit = c + 10 - (uint32) 'A'; /* convert letter */ c 10268 src/simh/scp.c char *c, *remnant = buf; c 10269 src/simh/scp.c while ((c = strchr(remnant, '\n'))) { c 10270 src/simh/scp.c if ((c != buf) && (*(c - 1) != '\r')) c 10271 src/simh/scp.c (void)printf("%.*s\r\n", (int)(c-remnant), remnant); c 10273 src/simh/scp.c (void)printf("%.*s\n", (int)(c-remnant), remnant); c 10274 src/simh/scp.c remnant = c + 1; c 10330 src/simh/scp.c char *c, *remnant = buf; c 10331 src/simh/scp.c while ((c = strchr(remnant, '\n'))) { c 10332 src/simh/scp.c if ((c != buf) && (*(c - 1) != '\r')) c 10333 src/simh/scp.c (void)printf("%.*s\r\n", (int)(c-remnant), remnant); c 10335 src/simh/scp.c (void)printf("%.*s\n", (int)(c-remnant), remnant); c 10336 src/simh/scp.c remnant = c + 1; c 135 src/simh/scp.h int sim_isspace (char c); c 136 src/simh/scp.h int sim_islower (char c); c 137 src/simh/scp.h int sim_isalpha (char c); c 138 src/simh/scp.h int sim_isprint (char c); c 139 src/simh/scp.h int sim_isdigit (char c); c 140 src/simh/scp.h int sim_isgraph (char c); c 141 src/simh/scp.h int sim_isalnum (char c); c 446 src/simh/sim_console.c int32 c; c 448 src/simh/sim_console.c c = tmxr_poll_conn (&sim_rem_con_tmxr); c 449 src/simh/sim_console.c if (c >= 0) { /* poll connect */ c 450 src/simh/sim_console.c TMLN *lp = &sim_rem_con_tmxr.ldsc[c]; c 455 src/simh/sim_console.c sim_rem_buf_ptr[c] = 0; /* start with empty command buffer */ c 456 src/simh/sim_console.c sim_rem_single_mode[c] = TRUE; /* start in single command mode */ c 457 src/simh/sim_console.c sim_rem_read_timeouts[c] = sim_rem_read_timeout; /* Start with default timeout */ c 469 src/simh/sim_console.c ((sim_rem_master_mode && (c == 0)) ? "" : "\nSimulator Running...")); c 470 src/simh/sim_console.c if (sim_rem_master_mode && (c == 0)) /* Master Mode session? */ c 471 src/simh/sim_console.c sim_rem_single_mode[c] = FALSE; /* start in multi-command mode */ c 646 src/simh/sim_console.c int32 i, j, c = 0; c 705 src/simh/sim_console.c c = tmxr_getc_ln (lp); c 706 src/simh/sim_console.c if (!(TMXR_VALID & c)) c 708 src/simh/sim_console.c c = c & ~TMXR_VALID; c 710 src/simh/sim_console.c if (c == sim_int_char) { /* ^E (the interrupt character) must start continue mode console interaction */ c 737 src/simh/sim_console.c ((c == '\n') || /* Ignore bare LF between commands (Microsoft Telnet bug) */ c 738 src/simh/sim_console.c (c == '\r'))) /* Ignore empty commands */ c 740 src/simh/sim_console.c if ((c == '\004') || (c == '\032')) { /* EOF character (^D or ^Z) ? */ c 773 src/simh/sim_console.c c = tmxr_getc_ln (lp); c 774 src/simh/sim_console.c if (!(TMXR_VALID & c)) { c 801 src/simh/sim_console.c c = c & ~TMXR_VALID; c 803 src/simh/sim_console.c switch (c) { c 854 src/simh/sim_console.c tmxr_putc_ln (lp, c); c 859 src/simh/sim_console.c sim_rem_buf[i][sim_rem_buf_ptr[i]++] = (char)c; c 865 src/simh/sim_console.c c = 0; c 867 src/simh/sim_console.c c = tmxr_getc_ln (lp); c 868 src/simh/sim_console.c c = c & ~TMXR_VALID; c 870 src/simh/sim_console.c } while ((!got_command) && ((!sim_rem_single_mode[i]) || c)); c 1738 src/simh/sim_console.c int32 c, trys = 0; c 1799 src/simh/sim_console.c c = sim_os_poll_kbd (); /* check for stop char */ c 1800 src/simh/sim_console.c if ((c == SCPE_STOP) || stop_cpu) c 1838 src/simh/sim_console.c t_stat c; c 1843 src/simh/sim_console.c if (sim_send_poll_data (&sim_con_send, &c)) /* injected input characters available? */ c 1844 src/simh/sim_console.c return c; c 1849 src/simh/sim_console.c c = sim_os_poll_kbd (); /* get character */ c 1850 src/simh/sim_console.c if (c == SCPE_STOP) { /* ^E */ c 1856 src/simh/sim_console.c if (c && sim_con_ldsc.rxbps) /* got something && rate limiting? */ c 1859 src/simh/sim_console.c return c; /* in-window */ c 1871 src/simh/sim_console.c if ((c = (t_stat)tmxr_getc_ln (&sim_con_ldsc))) /* any char? */ c 1872 src/simh/sim_console.c return (c & (SCPE_BREAK | 0377)) | SCPE_KFLAG; c 1878 src/simh/sim_console.c t_stat sim_putchar (int32 c) c 1880 src/simh/sim_console.c sim_exp_check (&sim_con_expect, c); c 1884 src/simh/sim_console.c fputc (c, sim_log); c 1885 src/simh/sim_console.c return sim_os_putchar (c); /* in-window version */ c 1893 src/simh/sim_console.c tmxr_putc_ln (&sim_con_ldsc, c); /* output char */ c 2045 src/simh/sim_console.c int c = -1; c 2056 src/simh/sim_console.c while (c == -1) { c 2068 src/simh/sim_console.c c = sim_brk_char | SCPE_BREAK; c 2071 src/simh/sim_console.c c = 0; /* return NUL */ c 2073 src/simh/sim_console.c c = rec.Event.KeyEvent.uChar.AsciiChar; c 2077 src/simh/sim_console.c if ((c & 0177) == sim_del_char) c 2078 src/simh/sim_console.c c = 0177; c 2079 src/simh/sim_console.c if ((c & 0177) == sim_int_char) c 2081 src/simh/sim_console.c if ((sim_brk_char && ((c & 0177) == sim_brk_char)) || (c & SCPE_BREAK)) c 2083 src/simh/sim_console.c return c | SCPE_KFLAG; c 2088 src/simh/sim_console.c static t_stat sim_os_putchar (int32 c) c 2096 src/simh/sim_console.c if (c != 0177) { c 2097 src/simh/sim_console.c if (c == BELL_CHAR) { c 2101 src/simh/sim_console.c WriteConsoleA(std_output, &c, 1, &unused, NULL); c 2106 src/simh/sim_console.c WriteConsoleA(std_output, &c, 1, &unused, NULL); c 2204 src/simh/sim_console.c char c; c 2209 src/simh/sim_console.c c = out; c 2210 src/simh/sim_console.c if (write (1, &c, 1)) {}; c 2323 src/simh/sim_console.c char c; c 2328 src/simh/sim_console.c c = out; c 2329 src/simh/sim_console.c (void)!write (1, &c, 1); c 2345 src/simh/sim_console.c char c; c 2348 src/simh/sim_console.c while ((c = *decoded++ = *encoded++)) /* copy the character */ c 2349 src/simh/sim_console.c if (c == ESC_CHAR) { /* does it start an escape? */ c 114 src/simh/sim_console.h t_stat sim_putchar (int32 c); c 120 src/simh/sim_console.h int32 sim_tt_inpcvt (int32 c, uint32 mode); c 121 src/simh/sim_console.h int32 sim_tt_outcvt (int32 c, uint32 mode); c 131 src/simh/sim_fio.c size_t c; c 135 src/simh/sim_fio.c c = fread (bptr, size, count, fptr); /* read buffer */ c 136 src/simh/sim_fio.c if (sim_end || (size == sizeof (char)) || (c == 0)) /* le, byte, or err? */ c 137 src/simh/sim_fio.c return c; /* done */ c 139 src/simh/sim_fio.c return c; c 166 src/simh/sim_fio.c size_t c, nelem, nbuf, lcnt, total; c 186 src/simh/sim_fio.c c = (i == 1)? lcnt: nelem; c 187 src/simh/sim_fio.c sim_buf_copy_swapped (sim_flip, sptr, size, c); c 189 src/simh/sim_fio.c c = fwrite (sim_flip, size, c, fptr); c 190 src/simh/sim_fio.c if (c == 0) { c 194 src/simh/sim_fio.c total = total + c; c 43 src/simh/sim_fio.h # define fxread(a,b,c,d) sim_fread (a, b, c, d) c 44 src/simh/sim_fio.h # define fxwrite(a,b,c,d) sim_fwrite (a, b, c, d) c 218 src/simh/sim_sock.c char *c; c 220 src/simh/sim_sock.c port = strtoul(service, &c, 10); c 221 src/simh/sim_sock.c if ((port == 0) || (*c != '\0')) { c 399 src/simh/sim_tape.c uint8 c; c 549 src/simh/sim_tape.c (void)sim_fread (&c, sizeof (uint8), 1, uptr->fileref); c 559 src/simh/sim_tape.c if ((sbc != 0) && (c & P7B_SOR)) /* next record? */ c 561 src/simh/sim_tape.c if ((c & P7B_DPAR) != P7B_EOF) c 613 src/simh/sim_tape.c uint8 c; c 739 src/simh/sim_tape.c (void)sim_fread (&c, sizeof (uint8), 1, uptr->fileref); c 746 src/simh/sim_tape.c if ((c & P7B_DPAR) != P7B_EOF) c 748 src/simh/sim_tape.c if (c & P7B_SOR) /* start of record? */ c 1523 src/simh/sim_tmxr.c int32 c; c 1527 src/simh/sim_tmxr.c while (TMXR_VALID & (c = tmxr_getc_ln (lp))) { c 1544 src/simh/sim_tmxr.c if ((lp->rxpboffset == 0) && (fc_size) && (c != frame_byte)) { c 1555 src/simh/sim_tmxr.c lp->rxpb[lp->rxpboffset++] = c & 0xFF; c 1856 src/simh/sim_tmxr.c #define TXBUF_CHAR(lp, c) { \ c 1857 src/simh/sim_tmxr.c lp->txb[lp->txbpi++] = (char)(c); \