Changeset 7258c6a in buchla-68k for ram/sqdkey.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/sqdkey.c
r0292fbb r7258c6a 17 17 #include "ptdisp.h" 18 18 19 extern short asig, astat;20 21 extern short action;22 extern short curslin;23 extern short sqdeflg;24 extern short stccol;25 extern short stcrow;26 27 extern charsqdebuf[50];19 extern int16_t asig, astat; 20 21 extern int16_t action; 22 extern int16_t curslin; 23 extern int16_t sqdeflg; 24 extern int16_t stccol; 25 extern int16_t stcrow; 26 27 extern int8_t sqdebuf[50]; 28 28 29 29 extern struct seqent seqbuf; 30 30 extern struct seqent seqtab[]; 31 31 32 short actfmt; /* action code format */33 34 /* 35 36 */ 37 38 charactlft[] = { 12, 24, 36 }; /* action field leftmost columns */39 40 charseqdfmt[] = { /* action data entry format by action */32 int16_t actfmt; /* action code format */ 33 34 /* 35 36 */ 37 38 int8_t actlft[] = { 12, 24, 36 }; /* action field leftmost columns */ 39 40 int8_t seqdfmt[] = { /* action data entry format by action */ 41 41 42 42 0, 1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3, 0, 4, 0, 3 … … 70 70 */ 71 71 72 void sqactde( short key)72 void sqactde(int16_t key) 73 73 { 74 register short col;75 short defmt;76 u nsigned short act, vtype;77 charbuf[8];74 register int16_t col; 75 int16_t defmt; 76 uint16_t act, vtype; 77 int8_t buf[8]; 78 78 79 79 col = stccol - actlft[action]; /* get field data entry column */ … … 388 388 */ 389 389 390 void sqdkey( short k)390 void sqdkey(int16_t k) 391 391 { 392 register short key;393 charbuf[8];392 register int16_t key; 393 int8_t buf[8]; 394 394 395 395 if (NOT astat) /* only do this on key closures */
Note:
See TracChangeset
for help on using the changeset viewer.