Changeset 298f0b4 in buchla-68k
- Timestamp:
- 07/14/2017 01:45:36 PM (7 years ago)
- Branches:
- master
- Children:
- 7d4cf30
- Parents:
- 33b5477
- Files:
-
- 7 edited
Legend:
- Unmodified
- Added
- Removed
-
include/regs.h
r33b5477 r298f0b4 15 15 struct regs { 16 16 17 int32_t d_reg[8];/* Data registers d0..d7 */17 uint32_t d_reg[8]; /* Data registers d0..d7 */ 18 18 19 int8_t *a_reg[8];/* Address registers */19 uint32_t a_reg[8]; /* Address registers */ 20 20 21 21 uint16_t reg_fill, /* Filler to keep long alignment */ 22 reg_sr, /* Status register */ 23 *reg_pc; /* Program counter */ 22 reg_sr; /* Status register */ 23 24 uint32_t reg_pc; /* Program counter */ 24 25 }; -
misc/proto.x
r33b5477 r298f0b4 26 26 extern int8_t VerDate[]; 27 27 extern int8_t ac_code; 28 extern int16_t *crshpc;29 extern int32_tcrshrg[16];30 extern int16_t *crshsp;28 extern uint32_t crshpc; 29 extern uint32_t crshrg[16]; 30 extern uint32_t crshsp; 31 31 extern uint16_t crshsr; 32 extern int16_tcrshst[16];33 extern int16_t *crshus;32 extern uint16_t crshst[16]; 33 extern uint32_t crshus; 34 34 extern int8_t crshvc[4]; 35 35 extern int8_t edata; -
misc/rewrite.txt
r33b5477 r298f0b4 1 ___divsi3 __divsi3 2 ___modsi3 __modsi3 3 ___mulsi3 __mulsi3 1 ___divsi3 __divsi3 2 ___modsi3 __modsi3 3 ___mulsi3 __mulsi3 4 ___udivsi3 __udivsi3 5 ___umodsi3 __umodsi3 -
ram/libdsp.c
r33b5477 r298f0b4 235 235 */ 236 236 237 int32_t chksum(int8_t *area, int32_t len) 238 { 239 register int32_t cs, i; 240 237 int32_t chksum(void *area, int32_t len) 238 { 239 uint8_t *area8; 240 int32_t cs, i; 241 242 area8 = area; 241 243 cs = 0L; 242 244 243 245 for (i = 0; i < len; i++) 244 cs += 0x000000FFL & *area ++;246 cs += 0x000000FFL & *area8++; 245 247 246 248 return(cs); … … 306 308 */ 307 309 308 int16_t wr_ec(FILE *fp, int8_t *from, int32_t len) 309 { 310 register int32_t count; 311 register int8_t c; 310 int16_t wr_ec(FILE *fp, void *from, int32_t len) 311 { 312 uint8_t *from8, c; 313 int32_t count; 314 315 from8 = from; 316 312 317 for (count = 0; count < len; count++) { 313 318 314 319 errno = 0; 315 c = *from ++;320 c = *from8++; 316 321 317 322 if (EOF EQ putc(c, fp)) { … … 346 351 */ 347 352 348 int16_t rd_ec(FILE *fp, int8_t *to, int32_t len) 349 { 350 register int32_t count; 351 register int16_t c; 353 int16_t rd_ec(FILE *fp, void *to, int32_t len) 354 { 355 uint8_t *to8; 356 int32_t count; 357 int16_t c; 358 359 to8 = to; 352 360 353 361 for (count = 0; count < len; count++) { … … 368 376 } else { 369 377 370 *to ++ =c;378 *to8++ = (uint8_t)c; 371 379 372 380 #if DEBUGRE -
ram/libdsp.x
r33b5477 r298f0b4 29 29 extern void advlcur(void); 30 30 extern void bsplcur(void); 31 extern int32_t chksum( int8_t*area, int32_t len);31 extern int32_t chksum(void *area, int32_t len); 32 32 extern int16_t ckdups(void); 33 33 extern int16_t ckstor(void); … … 57 57 extern int16_t ocslot(int16_t slot); 58 58 extern int16_t putcat(void); 59 extern int16_t rd_ec(FILE *fp, int8_t*to, int32_t len);59 extern int16_t rd_ec(FILE *fp, void *to, int32_t len); 60 60 extern int16_t showcat(void); 61 61 extern int16_t showsiz(void); … … 65 65 extern int16_t storit(void); 66 66 extern void streset(void); 67 extern int16_t wr_ec(FILE *fp, int8_t*from, int32_t len);67 extern int16_t wr_ec(FILE *fp, void *from, int32_t len); 68 68 extern int16_t writem(void); 69 69 extern int16_t wrtfile(int16_t kind); -
rom/romp.c
r33b5477 r298f0b4 324 324 */ 325 325 326 voidcx_exit(void)326 int16_t cx_exit(void) 327 327 { 328 328 longjmp(&restart, 1); /* restart ROMP */ 329 return(TRUE); /* not reached */ 329 330 } 330 331 … … 335 336 */ 336 337 337 voidcx_rest(void)338 int16_t cx_rest(void) 338 339 { 339 340 rjumpto(ROMADDR); 341 return(TRUE); /* not reached */ 340 342 } 341 343 … … 363 365 } else { 364 366 365 for (i = 0; i < 8; i++) /* clear d0..d7 */367 for (i = 0; i < 8; i++) /* clear d0..d7 */ 366 368 regptr->d_reg[i] = 0L; 367 369 368 for (i = 0; i < 7; i++) /* clear a0..a6 */369 regptr->a_reg[i] = (int8_t *)0L;370 371 regptr->a_reg[7] = ISTACK; /* setup initial stack */372 373 regptr->reg_sr = INITSR; /* setup sr */374 regptr->reg_pc = B_buf_a; /* setup pc */370 for (i = 0; i < 7; i++) /* clear a0..a6 */ 371 regptr->a_reg[i] = 0L; 372 373 regptr->a_reg[7] = ISTACK; /* setup initial stack */ 374 375 regptr->reg_sr = INITSR; /* setup sr */ 376 regptr->reg_pc = (uint32_t)B_buf_a; /* setup pc */ 375 377 376 378 return(TRUE); … … 451 453 452 454 for (i = 0; i < 7; i++) /* clear a0..a6 */ 453 regptr->a_reg[i] = (int8_t *)0L;455 regptr->a_reg[i] = 0L; 454 456 455 457 regptr->a_reg[7] = ISTACK; /* setup initial stack */ … … 975 977 */ 976 978 977 void putn( int32_t num, int16_t cw, int16_t unit)979 void putn(uint32_t num, int16_t cw, int16_t unit) 978 980 { 979 981 register int16_t d; … … 1001 1003 */ 1002 1004 1003 void puthn( int32_t num, int16_t cw, int16_t unit)1005 void puthn(uint32_t num, int16_t cw, int16_t unit) 1004 1006 { 1005 1007 register int16_t d; … … 1034 1036 while (nwide--) { 1035 1037 1036 puthn(( int32_t)(0xFF & *loc), 2, unit);1038 puthn((uint32_t)(0xFF & *loc), 2, unit); 1037 1039 BIOS(B_PUTC, unit, ' '); 1038 1040 … … 1068 1070 void padr(int32_t adr, int16_t unit) 1069 1071 { 1070 puthn( adr, 8, unit);1072 puthn((uint32_t)adr, 8, unit); 1071 1073 BIOS(B_PUTC, unit, ' '); 1072 1074 BIOS(B_PUTC, unit, '-'); … … 1413 1415 */ 1414 1416 1415 voidcx_zap(void)1417 int16_t cx_zap(void) 1416 1418 { 1417 1419 register int16_t *p, *q; … … 1426 1428 1427 1429 rjumpto(ROMADDR); 1430 return(TRUE); /* not reached */ 1428 1431 } 1429 1432 … … 1527 1530 writeln(cmdunit, "\r\n\nBPB values:\r\n"); 1528 1531 writeln(cmdunit, "\r\n recsiz "); 1529 putn(( int32_t)bpp->recsiz, 5, cmdunit);1532 putn((uint32_t)bpp->recsiz, 5, cmdunit); 1530 1533 writeln(cmdunit, "\r\n clsiz "); 1531 putn(( int32_t)bpp->clsiz, 4, cmdunit);1534 putn((uint32_t)bpp->clsiz, 4, cmdunit); 1532 1535 writeln(cmdunit, "\r\n clsizb "); 1533 putn(( int32_t)bpp->clsizb, 5, cmdunit);1536 putn((uint32_t)bpp->clsizb, 5, cmdunit); 1534 1537 writeln(cmdunit, "\r\n rdlen "); 1535 putn(( int32_t)bpp->rdlen, 4, cmdunit);1538 putn((uint32_t)bpp->rdlen, 4, cmdunit); 1536 1539 writeln(cmdunit, "\r\n fsiz "); 1537 putn(( int32_t)bpp->fsiz, 4, cmdunit);1540 putn((uint32_t)bpp->fsiz, 4, cmdunit); 1538 1541 writeln(cmdunit, "\r\n fatrec "); 1539 putn(( int32_t)bpp->fatrec, 5, cmdunit);1542 putn((uint32_t)bpp->fatrec, 5, cmdunit); 1540 1543 writeln(cmdunit, "\r\n datrec "); 1541 putn(( int32_t)bpp->datrec, 5, cmdunit);1544 putn((uint32_t)bpp->datrec, 5, cmdunit); 1542 1545 writeln(cmdunit, "\r\n numcl "); 1543 putn(( int32_t)bpp->numcl, 5, cmdunit);1546 putn((uint32_t)bpp->numcl, 5, cmdunit); 1544 1547 writeln(cmdunit, "\r\n bflags "); 1545 puthn(( int32_t)bpp->bflags, 4, cmdunit);1548 puthn((uint32_t)bpp->bflags, 4, cmdunit); 1546 1549 writeln(cmdunit, "\r\n ntracks "); 1547 putn(( int32_t)bpp->ntracks, 4, cmdunit);1550 putn((uint32_t)bpp->ntracks, 4, cmdunit); 1548 1551 writeln(cmdunit, "\r\n nsides "); 1549 putn(( int32_t)bpp->nsides, 4, cmdunit);1552 putn((uint32_t)bpp->nsides, 4, cmdunit); 1550 1553 writeln(cmdunit, "\r\n sec/cyl "); 1551 putn(( int32_t)bpp->dspc, 5, cmdunit);1554 putn((uint32_t)bpp->dspc, 5, cmdunit); 1552 1555 writeln(cmdunit, "\r\n sec/trk "); 1553 putn(( int32_t)bpp->dspt, 5, cmdunit);1556 putn((uint32_t)bpp->dspt, 5, cmdunit); 1554 1557 writeln(cmdunit, "\r\n hidden "); 1555 putn(( int32_t)bpp->hidden, 4, cmdunit);1558 putn((uint32_t)bpp->hidden, 4, cmdunit); 1556 1559 writeln(cmdunit, "\r\n\n"); 1557 1560 return(TRUE); … … 1585 1588 1586 1589 writeln(cmdunit, "\r\n\n** Breakpoint 0 at "); 1587 puthn(( int32_t)p_ba0, 8, cmdunit);1590 puthn((uint32_t)p_ba0, 8, cmdunit); 1588 1591 writeln(cmdunit, " was "); 1589 puthn(0xFFFFL & ( int32_t)(*p_ba0), 4, cmdunit);1592 puthn(0xFFFFL & (uint32_t)(*p_ba0), 4, cmdunit); 1590 1593 writeln(cmdunit, " instead of "); 1591 puthn(0xFFFFL & ( int32_t)BPINST, 4, cmdunit);1594 puthn(0xFFFFL & (uint32_t)BPINST, 4, cmdunit); 1592 1595 writeln(cmdunit, " **\r\n\n"); 1593 1596 } … … 1612 1615 1613 1616 writeln(cmdunit, "\r\n\n** Breakpoint 1 at "); 1614 puthn(( int32_t)p_ba1, 8, cmdunit);1617 puthn((uint32_t)p_ba1, 8, cmdunit); 1615 1618 writeln(cmdunit, " was "); 1616 puthn(0xFFFFL & ( int32_t)(*p_ba1), 4, cmdunit);1619 puthn(0xFFFFL & (uint32_t)(*p_ba1), 4, cmdunit); 1617 1620 writeln(cmdunit, " instead of "); 1618 puthn(0xFFFFL & ( int32_t)BPINST, 4, cmdunit);1621 puthn(0xFFFFL & (uint32_t)BPINST, 4, cmdunit); 1619 1622 writeln(cmdunit, " **\r\n\n"); 1620 1623 } … … 1943 1946 if (rnum < 17) { /* a0..a7 -- address register */ 1944 1947 1945 regptr->a_reg[rnum-9] = (int8_t *)p_value;1948 regptr->a_reg[rnum-9] = p_value; 1946 1949 return(TRUE); 1947 1950 } … … 1965 1968 return(FALSE); 1966 1969 1967 regptr->reg_pc = (int8_t *)p_value;1970 regptr->reg_pc = p_value; 1968 1971 return(TRUE); 1969 1972 } … … 1974 1977 return(FALSE); 1975 1978 1976 regptr->a_reg[7] = (int8_t *)p_value;1979 regptr->a_reg[7] = p_value; 1977 1980 return(TRUE); 1978 1981 } … … 2103 2106 2104 2107 writeln(cmdunit, " "); 2105 putn(( int32_t)l++, 2, cmdunit);2108 putn((uint32_t)l++, 2, cmdunit); 2106 2109 writeln(cmdunit, ":"); 2107 puthn(( int32_t)*rp++, 4, cmdunit);2110 puthn((uint32_t)*rp++, 4, cmdunit); 2108 2111 } 2109 2112 … … 2254 2257 writeln(cmdunit, NACK); 2255 2258 writeln(cmdunit, "** Load error "); 2256 putn(( int32_t)rc, 3, cmdunit);2259 putn((uint32_t)rc, 3, cmdunit); 2257 2260 writeln(cmdunit, " **\r\n\n"); 2258 2261 return(FALSE); … … 2279 2282 writeln(cmdunit, NACK); 2280 2283 writeln(cmdunit, "** Load aborted on "); 2281 puthn( rc, 2, cmdunit);2284 puthn((uint32_t)rc, 2, cmdunit); 2282 2285 writeln(cmdunit, " **\r\n\n"); 2283 2286 return(FALSE); … … 2313 2316 2314 2317 writeln(cmdunit, "\r\n** FILL failed at "); 2315 puthn(( int32_t)cp, 8, cmdunit);2318 puthn((uint32_t)cp, 8, cmdunit); 2316 2319 writeln(cmdunit, " **\r\n"); 2317 2320 return(FALSE); … … 2379 2382 2380 2383 writeln(cmdunit, "\r\n** COPY failed from "); 2381 puthn(( int32_t)from, 8, cmdunit);2384 puthn((uint32_t)from, 8, cmdunit); 2382 2385 writeln(cmdunit, " to "); 2383 puthn(( int32_t)to, 8, cmdunit);2386 puthn((uint32_t)to, 8, cmdunit); 2384 2387 writeln(cmdunit, " with (from) = "); 2385 puthn(( int32_t)(*from), 2, cmdunit);2388 puthn((uint32_t)(*from), 2, cmdunit); 2386 2389 writeln(cmdunit, " and (to) = "); 2387 puthn(( int32_t)(*to), 2, cmdunit);2390 puthn((uint32_t)(*to), 2, cmdunit); 2388 2391 writeln(cmdunit, " **\r\n"); 2389 2392 return(FALSE); … … 2404 2407 2405 2408 writeln(cmdunit, "\r\n** COPY failed from "); 2406 puthn(( int32_t)from, 8, cmdunit);2409 puthn((uint32_t)from, 8, cmdunit); 2407 2410 writeln(cmdunit, " to "); 2408 puthn(( int32_t)to, 8, cmdunit);2411 puthn((uint32_t)to, 8, cmdunit); 2409 2412 writeln(cmdunit, " with (from) = "); 2410 puthn(( int32_t)(*from), 2, cmdunit);2413 puthn((uint32_t)(*from), 2, cmdunit); 2411 2414 writeln(cmdunit, " and (to) = "); 2412 puthn(( int32_t)(*to), 2, cmdunit);2415 puthn((uint32_t)(*to), 2, cmdunit); 2413 2416 writeln(cmdunit, " **\r\n"); 2414 2417 return(FALSE); … … 2487 2490 while (nwide--) { 2488 2491 2489 puthn(( int32_t)(0xFFFFL & *loc), 4, unit);2492 puthn((uint32_t)(0xFFFFL & *loc), 4, unit); 2490 2493 BIOS(B_PUTC,unit, ' '); 2491 2494 … … 2519 2522 while (nwide--) { 2520 2523 2521 puthn( *loc, 8, unit);2524 puthn((uint32_t)*loc, 8, unit); 2522 2525 BIOS(B_PUTC,unit, ' '); 2523 2526 … … 2796 2799 2797 2800 vc = *monptr & 0x0FF; 2798 puthn(( int32_t)vc, 2, cmdunit);2801 puthn((uint32_t)vc, 2, cmdunit); 2799 2802 writeln(cmdunit, "\r\n"); 2800 2803 … … 2806 2809 2807 2810 vc = vcc; 2808 puthn(( int32_t)vc, 2, cmdunit);2811 puthn((uint32_t)vc, 2, cmdunit); 2809 2812 writeln(cmdunit, "\r\n"); 2810 2813 } … … 2818 2821 vsp = (int16_t *)monptr; 2819 2822 vs = *vsp; 2820 puthn(( int32_t)vs, 4, cmdunit);2823 puthn((uint32_t)vs, 4, cmdunit); 2821 2824 writeln(cmdunit, "\r\n"); 2822 2825 … … 2828 2831 2829 2832 vs = vss; 2830 puthn(( int32_t)vs, 4, cmdunit);2833 puthn((uint32_t)vs, 4, cmdunit); 2831 2834 writeln(cmdunit, "\r\n"); 2832 2835 } … … 2843 2846 vlp = (int32_t *)monptr; 2844 2847 vl = *vlp; 2845 puthn( vl, 8, cmdunit);2848 puthn((uint32_t)vl, 8, cmdunit); 2846 2849 writeln(cmdunit, "\r\n"); 2847 2850 … … 2853 2856 2854 2857 vl = vll; 2855 puthn( vl, 8, cmdunit);2858 puthn((uint32_t)vl, 8, cmdunit); 2856 2859 writeln(cmdunit, "\r\n"); 2857 2860 } … … 3089 3092 3090 3093 writeln(cmdunit, "\r\nERROR reading disk: "); 3091 puthn( rc, 8, cmdunit);3094 puthn((uint32_t)rc, 8, cmdunit); 3092 3095 writeln(cmdunit, "\r\n\n"); 3093 3096 return(FALSE); … … 3122 3125 3123 3126 writeln(cmdunit, "\r\nERROR writing disk: "); 3124 puthn( rc, 8, cmdunit);3127 puthn((uint32_t)rc, 8, cmdunit); 3125 3128 writeln(cmdunit, "\r\n\n"); 3126 3129 return(FALSE); … … 3173 3176 3174 3177 writeln(cmdunit, "\r\nPC = "); 3175 puthn(( int32_t)rp->reg_pc, 8, cmdunit);3178 puthn((uint32_t)rp->reg_pc, 8, cmdunit); 3176 3179 3177 3180 srtemp = rp->reg_sr; 3178 3181 writeln(cmdunit, ", SR = "); 3179 puthn( (int32_t)srtemp & 0xFFFFL, 4, cmdunit);3182 puthn((uint32_t)srtemp & 0xFFFFL, 4, cmdunit); 3180 3183 3181 3184 /* … … 3184 3187 3185 3188 writeln(cmdunit, " (IPL = "); 3186 puthn( (int32_t)(srtemp >> 8) & 0x7L, 1, cmdunit);3189 puthn((uint32_t)(srtemp >> 8) & 0x7L, 1, cmdunit); 3187 3190 writeln(cmdunit, ", "); 3188 3191 … … 3270 3273 3271 3274 writeln(cmdunit, "\r\n\nPC = "); 3272 puthn( (int32_t)crshpc, 8, cmdunit);3275 puthn(crshpc, 8, cmdunit); 3273 3276 3274 3277 srtemp = crshsr; 3275 3278 writeln(cmdunit, ", SR = "); 3276 puthn(( int32_t)srtemp & 0xFFFFL, 4, cmdunit);3279 puthn((uint32_t)srtemp & 0xFFFFL, 4, cmdunit); 3277 3280 3278 3281 /* … … 3281 3284 3282 3285 writeln(cmdunit, " (IPL = "); 3283 puthn(( int32_t)(srtemp >> 8) & 0x7L, 1, cmdunit);3286 puthn((uint32_t)(srtemp >> 8) & 0x7L, 1, cmdunit); 3284 3287 writeln(cmdunit, ", "); 3285 3288 … … 3327 3330 */ 3328 3331 writeln(cmdunit, "TRAP vector number = "); 3329 putn(( int32_t)crshvc[0], 2, cmdunit);3332 putn((uint32_t)crshvc[0], 2, cmdunit); 3330 3333 3331 3334 cause = " (no handler for interrupt)"; … … 3470 3473 rc = FALSE; 3471 3474 3472 if ( (int8_t *)p_ba0 EQ regptr->reg_pc) {3475 if (p_ba0 EQ regptr->reg_pc) { 3473 3476 3474 3477 if (*p_ba0 EQ BPINST) { … … 3482 3485 3483 3486 writeln(cmdunit, "** Breakpoint word at "); 3484 puthn( p_ba0, 8 , cmdunit);3487 puthn((uint32_t)p_ba0, 8 , cmdunit); 3485 3488 writeln(cmdunit, " was "); 3486 puthn(0xFFFFL & ( int32_t)(*p_ba0), 4, cmdunit);3489 puthn(0xFFFFL & (uint32_t)(*p_ba0), 4, cmdunit); 3487 3490 writeln(cmdunit, " instead of "); 3488 puthn(( int32_t)BPINST, 4, cmdunit);3491 puthn((uint32_t)BPINST, 4, cmdunit); 3489 3492 writeln(cmdunit, " **\r\n\n"); 3490 3493 rc = TRUE; … … 3496 3499 */ 3497 3500 3498 if ( (int8_t *)p_ba1 EQ regptr->reg_pc) {3501 if (p_ba1 EQ regptr->reg_pc) { 3499 3502 3500 3503 if (*p_ba1 EQ BPINST) { … … 3508 3511 3509 3512 writeln(cmdunit, "** Breakpoint word at "); 3510 puthn(( int32_t)p_ba0, 8 , cmdunit);3513 puthn((uint32_t)p_ba0, 8 , cmdunit); 3511 3514 writeln(cmdunit, " was "); 3512 puthn(0xFFFFL & ( int32_t)(*p_ba1), 4, cmdunit);3515 puthn(0xFFFFL & (uint32_t)(*p_ba1), 4, cmdunit); 3513 3516 writeln(cmdunit, " instead of "); 3514 puthn(( int32_t)BPINST, 4, cmdunit);3517 puthn((uint32_t)BPINST, 4, cmdunit); 3515 3518 writeln(cmdunit, " **\r\n\n"); 3516 3519 rc = TRUE; … … 3532 3535 3533 3536 writeln(cmdunit, "** Breakpoint word at "); 3534 puthn( p_ba0, 8 , cmdunit);3537 puthn((uint32_t)p_ba0, 8 , cmdunit); 3535 3538 writeln(cmdunit, " was "); 3536 puthn(0xFFFFL & ( int32_t)(*p_ba0), 4, cmdunit);3539 puthn(0xFFFFL & (uint32_t)(*p_ba0), 4, cmdunit); 3537 3540 writeln(cmdunit, " instead of "); 3538 puthn(( int32_t)BPINST, 4, cmdunit);3541 puthn((uint32_t)BPINST, 4, cmdunit); 3539 3542 writeln(cmdunit, " **\r\n\n"); 3540 3543 rc = TRUE; … … 3558 3561 3559 3562 writeln(cmdunit, "** Breakpoint word at "); 3560 puthn(( int32_t)p_ba0, 8 , cmdunit);3563 puthn((uint32_t)p_ba0, 8 , cmdunit); 3561 3564 writeln(cmdunit, " was "); 3562 puthn(0xFFFFL & ( int32_t)(*p_ba1), 4, cmdunit);3565 puthn(0xFFFFL & (uint32_t)(*p_ba1), 4, cmdunit); 3563 3566 writeln(cmdunit, " instead of "); 3564 puthn(( int32_t)BPINST, 4, cmdunit);3567 puthn((uint32_t)BPINST, 4, cmdunit); 3565 3568 writeln(cmdunit, " **\r\n\n"); 3566 3569 rc = TRUE; … … 3617 3620 3618 3621 for (i = 0; i < 7; i++) /* clear a0..a6 */ 3619 regptr->a_reg[i] = (int8_t *)0L;3622 regptr->a_reg[i] = 0L; 3620 3623 3621 3624 regptr->a_reg[7] = ISTACK; /* setup initial stack */ … … 3682 3685 writeln(cmdunit, "\r\n BIOS Version "); 3683 3686 pcptr = (int8_t *)PRM_VERS; 3684 putn(( int32_t)*pcptr++, 2, cmdunit);3687 putn((uint32_t)*pcptr++, 2, cmdunit); 3685 3688 BIOS(B_PUTC, cmdunit, '.'); 3686 putn(( int32_t)*pcptr++, 2, cmdunit);3689 putn((uint32_t)*pcptr++, 2, cmdunit); 3687 3690 writeln(cmdunit, promdate); 3688 3691 -
rom/romp.x
r33b5477 r298f0b4 122 122 extern int16_t cx_dini(void); 123 123 extern int16_t cx_dump(void); 124 extern voidcx_exit(void);124 extern int16_t cx_exit(void); 125 125 extern int16_t cx_fill(void); 126 126 extern int16_t cx_go(void); … … 137 137 extern int16_t cx_read(void); 138 138 extern int16_t cx_regs(void); 139 extern voidcx_rest(void);139 extern int16_t cx_rest(void); 140 140 extern int16_t cx_rset(void); 141 141 extern int16_t cx_vreg(void); … … 145 145 extern int16_t cx_writ(void); 146 146 extern int16_t cx_wset(void); 147 extern voidcx_zap(void);147 extern int16_t cx_zap(void); 148 148 extern int16_t ddump(int8_t *loc, int8_t *lastloc, int16_t nwide, int16_t unit); 149 149 extern void do_cmd(void); … … 162 162 extern void progid(void); 163 163 extern int16_t pscan(void); 164 extern void puthn( int32_t num, int16_t cw, int16_t unit);165 extern void putn( int32_t num, int16_t cw, int16_t unit);164 extern void puthn(uint32_t num, int16_t cw, int16_t unit); 165 extern void putn(uint32_t num, int16_t cw, int16_t unit); 166 166 extern void rompbp(int32_t d0, int32_t d1, int32_t d2, int32_t d3, int32_t d4, int32_t d5, int32_t d6, int32_t d7, int8_t *a0, int8_t *a1, int8_t *a2, int8_t *a3, int8_t *a4, int8_t *a5, int8_t *a6, int8_t *a7, uint16_t sr0, uint16_t sr, int8_t *pc); 167 167 extern int16_t setvar(int32_t *var, int32_t deflt);
Note:
See TracChangeset
for help on using the changeset viewer.