Changeset 7258c6a in buchla-68k for ram/sedump.c
- Timestamp:
- 07/09/2017 04:45:34 PM (7 years ago)
- Branches:
- master
- Children:
- 8618599
- Parents:
- 0292fbb
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
ram/sedump.c
r0292fbb r7258c6a 18 18 #include "instdsp.h" 19 19 20 extern u nsignedscrl;21 22 extern short curfunc;23 extern short curvce;24 extern short sbase;25 extern short sd;26 extern short se;27 extern short soffset;28 extern short subj;29 30 extern short varmode[][16];20 extern uint16_t scrl; 21 22 extern int16_t curfunc; 23 extern int16_t curvce; 24 extern int16_t sbase; 25 extern int16_t sd; 26 extern int16_t se; 27 extern int16_t soffset; 28 extern int16_t subj; 29 30 extern int16_t varmode[][16]; 31 31 32 32 extern struct gdsel *gdstbc[NGDSEL]; … … 39 39 extern struct instdef vbufs[]; 40 40 41 extern char*idbxlbl[];42 extern char*osclbl[];43 44 /* 45 46 */ 47 48 char*A6PTR = 0L; /* traceback a6 starting address */49 char*A7PTR = 0L; /* traceback a7 starting address */50 char*A7TOP = 0x000FFFFFL; /* traceback stack top */51 52 short SCnumv = 0; /* voice for SCvoice() to dump (0..11) */53 short SL_Flag; /* ROMP trap disable flag */54 short x_unrec; /* unrecognized event type or size flag */55 56 longSCdlim = MAX_SE; /* score dump limit */57 58 char*evkinds[N_ETYPES] = { /* event types (must match score.h) */41 extern int8_t *idbxlbl[]; 42 extern int8_t *osclbl[]; 43 44 /* 45 46 */ 47 48 int8_t *A6PTR = 0L; /* traceback a6 starting address */ 49 int8_t *A7PTR = 0L; /* traceback a7 starting address */ 50 int8_t *A7TOP = 0x000FFFFFL; /* traceback stack top */ 51 52 int16_t SCnumv = 0; /* voice for SCvoice() to dump (0..11) */ 53 int16_t SL_Flag; /* ROMP trap disable flag */ 54 int16_t x_unrec; /* unrecognized event type or size flag */ 55 56 int32_t SCdlim = MAX_SE; /* score dump limit */ 57 58 int8_t *evkinds[N_ETYPES] = { /* event types (must match score.h) */ 59 59 60 60 "00: EV_NULL null event ", "01: EV_SCORE score begin ", … … 72 72 }; 73 73 74 char*hpname[N_TYPES] = { /* header type names (must match score.h) */74 int8_t *hpname[N_TYPES] = { /* header type names (must match score.h) */ 75 75 76 76 "EH_INST", "EH_GRP ", "EH_LOCN", "EH_DYN ", … … 79 79 }; 80 80 81 char*var_lbl[6] = { /* variable names */81 int8_t *var_lbl[6] = { /* variable names */ 82 82 83 83 "Pch/Hor", "Mod/Vrt", "Brth/LP", "GPC/CV1", … … 85 85 }; 86 86 87 char*srcname[] = { /* source names (must match smdefs.h) */87 int8_t *srcname[] = { /* source names (must match smdefs.h) */ 88 88 89 89 "NONE", "RAND", "CTL1", "?03?", "?04?", "PTCH", "KPRS", "KVEL", … … 91 91 }; 92 92 93 char*actname[] = { /* function action names */93 int8_t *actname[] = { /* function action names */ 94 94 95 95 "NULL", "SUST", "ENBL", "JUMP", "LOOP", "KYUP", "KYDN", "HERE" … … 108 108 */ 109 109 110 char*ev_kind(struct s_entry *sep)110 int8_t *ev_kind(struct s_entry *sep) 111 111 { 112 112 if ((sep->e_type & 0x00FF) GE N_ETYPES) { … … 157 157 void SEsnap(void) 158 158 { 159 register short i, j;159 register int16_t i, j; 160 160 161 161 printf("\n"); … … 211 211 struct s_entry *SEdump(struct s_entry *sep) 212 212 { 213 char*et;213 int8_t *et; 214 214 215 215 x_unrec = TRUE; … … 280 280 */ 281 281 282 struct s_entry *SEchase(struct s_entry *ep, longn)283 { 284 register longi;282 struct s_entry *SEchase(struct s_entry *ep, int32_t n) 283 { 284 register int32_t i; 285 285 register struct s_entry *np; 286 286 … … 331 331 void SLdump(void) 332 332 { 333 register short i;333 register int16_t i; 334 334 register struct gdsel *gp; 335 335 … … 374 374 void SECdump(void) 375 375 { 376 register short i;376 register int16_t i; 377 377 378 378 printf("p_sbgn = $%08lX p_send = $%08lX\n", … … 438 438 void DOA(void) 439 439 { 440 register long*olda6, *cura6;441 register short n, *prptr;440 register int32_t *olda6, *cura6; 441 register int16_t n, *prptr; 442 442 443 443 if (A6PTR AND A7PTR) { … … 551 551 void SCslice(void) 552 552 { 553 register short i, s;553 register int16_t i, s; 554 554 register struct gdsel *gp; 555 555 … … 652 652 */ 653 653 654 void SCvce(int n)655 { 656 register short i, j, pif, pt1;654 void SCvce(int16_t n) 655 { 656 register int16_t i, j, pif, pt1; 657 657 register struct instdef *ip; 658 658 register struct idfnhdr *fp; … … 743 743 void SCvces(void) 744 744 { 745 register short i;745 register int16_t i; 746 746 747 747 for (i = 0; i < 12; i++)
Note:
See TracChangeset
for help on using the changeset viewer.