Changeset add86dd in buchla-68k for rom/romp.c
- Timestamp:
- 07/14/2017 02:32:11 PM (7 years ago)
- Branches:
- master
- Children:
- 4422c8e
- Parents:
- 7d4cf30
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
rom/romp.c
r7d4cf30 radd86dd 246 246 *p_end, /* end parameter */ 247 247 *p_from, /* from parameter */ 248 *p_goto, /* goto parameter */249 248 *p_to, /* to parameter */ 250 249 *sptr; /* string scan pointer */ … … 301 300 jmp_buf restart; /* jmp environment */ 302 301 303 int32_t p_len, /* length parameter */ 302 int32_t p_goto, /* goto parameter */ 303 p_len, /* length parameter */ 304 304 p_value, /* value parameter */ 305 305 p_width; /* width parameter */ … … 338 338 int16_t cx_rest(void) 339 339 { 340 rjumpto( ROMADDR);340 rjumpto((void *)ROMADDR); 341 341 return(TRUE); /* not reached */ 342 342 } … … 449 449 } else { 450 450 451 for (i = 0; i < 8; i++) /* clear d0..d7 */451 for (i = 0; i < 8; i++) /* clear d0..d7 */ 452 452 regptr->d_reg[i] = 0L; 453 453 454 for (i = 0; i < 7; i++) /* clear a0..a6 */454 for (i = 0; i < 7; i++) /* clear a0..a6 */ 455 455 regptr->a_reg[i] = 0L; 456 456 457 regptr->a_reg[7] = ISTACK; /* setup initial stack */458 459 regptr->reg_sr = INITSR; /* setup sr */460 regptr->reg_pc = B_buf_a; /* setup pc */457 regptr->a_reg[7] = ISTACK; /* setup initial stack */ 458 459 regptr->reg_sr = INITSR; /* setup sr */ 460 regptr->reg_pc = (uint32_t)B_buf_a; /* setup pc */ 461 461 462 462 return(TRUE); … … 581 581 vsndpal(dfltpal); 582 582 583 obj0 = 0x200400L;583 obj0 = (uint16_t *)0x200400L; 584 584 585 585 SetObj(0, 0, 0, obj0, 512, 350, 0, 0, (V_RES3 | V_TDE), -1); … … 1079 1079 */ 1080 1080 1081 void padr( int32_tadr, int16_t unit)1081 void padr(void *adr, int16_t unit) 1082 1082 { 1083 1083 puthn((uint32_t)adr, 8, unit); … … 1340 1340 1341 1341 if (oldloc LT (int16_t *)USER_RAM) 1342 rjumpto(( int32_t)ROMADDR);1342 rjumpto((void *)ROMADDR); 1343 1343 1344 1344 return(TRUE); … … 1364 1364 if (getarg()) { 1365 1365 1366 if (set p(&p_goto, p_goto) EQ FALSE)1367 return(FALSE); 1368 1369 if (1L & (int32_t)p_goto)1366 if (setvar(&p_goto, p_goto) EQ FALSE) 1367 return(FALSE); 1368 1369 if (1L & p_goto) 1370 1370 return(FALSE); 1371 1371 … … 1438 1438 *p++ = 0; 1439 1439 1440 rjumpto( ROMADDR);1440 rjumpto((void *)ROMADDR); 1441 1441 return(TRUE); /* not reached */ 1442 1442 } … … 3822 3822 return(FALSE); 3823 3823 else 3824 sjumpto( B_buf_a, (void *)ISTACK);3824 sjumpto((void *)B_buf_a, (void *)ISTACK); 3825 3825 3826 3826 } else if (astat AND (asig EQ ROMPKEY)) { /* ROMP key */ … … 3902 3902 b1flag = FALSE; 3903 3903 3904 p_goto = (int8_t *)ROMADDR;3904 p_goto = ROMADDR; 3905 3905 p_len = 0L; 3906 3906 p_width = 16L;
Note:
See TracChangeset
for help on using the changeset viewer.