Changeset 7258c6a in buchla-68k for ram/sqexec.c


Ignore:
Timestamp:
07/09/2017 04:45:34 PM (7 years ago)
Author:
Thomas Lopatic <thomas@…>
Branches:
master
Children:
8618599
Parents:
0292fbb
Message:

Use standard integer types.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • ram/sqexec.c

    r0292fbb r7258c6a  
    3434#endif
    3535
    36 extern  unsigned        setsr(unsigned sr);
    37 extern  long    rand24(void);
    38 
    39 extern  char            trgtab[];
    40 
    41 extern  short           curslin;
    42 extern  short           dsp_ok;
    43 extern  short           ndisp;
    44 
    45 extern  unsigned short  seqdupd;
    46 
    47 extern  unsigned        *obj10;
    48 
    49 extern  int             cg3[][256];
     36extern  uint16_t        setsr(uint16_t sr);
     37extern  int32_t rand24(void);
     38
     39extern  int8_t          trgtab[];
     40
     41extern  int16_t         curslin;
     42extern  int16_t         dsp_ok;
     43extern  int16_t         ndisp;
     44
     45extern  uint16_t        seqdupd;
     46
     47extern  uint16_t        *obj10;
     48
     49extern  int16_t         cg3[][256];
    5050
    5151extern  struct wordq    ptefifo;
    5252
    53 short   seqdspn;
    54 
    55 short   rtab[] = { 0x0000, 0x0001, 0x0003, 0x0007, 0x000F, 0x001F, 0x003F,
     53int16_t seqdspn;
     54
     55int16_t rtab[] = { 0x0000, 0x0001, 0x0003, 0x0007, 0x000F, 0x001F, 0x003F,
    5656                   0x003F, 0x003F, 0x003F };
    5757
     
    6666*/
    6767
    68 unsigned short evaltv(unsigned short dat)
     68uint16_t evaltv(uint16_t dat)
    6969{
    7070        switch (SQ_MTYP & dat) {
     
    8484        case SQ_RND:    /* random number */
    8585
    86                 return((short)rand24() & rtab[SQ_MVAL & dat]);
     86                return((int16_t)rand24() & rtab[SQ_MVAL & dat]);
    8787
    8888        default:        /* something weird got in here ... */
     
    102102*/
    103103
    104 short dosqact(unsigned short seq, unsigned short act, unsigned short dat)
     104int16_t dosqact(uint16_t seq, uint16_t act, uint16_t dat)
    105105{
    106         register unsigned short obj, val;
    107         register short sv;
     106        register uint16_t obj, val;
     107        register int16_t sv;
    108108
    109109        obj = (SQ_MOBJ & act) >> 8;
     
    269269*/
    270270
    271 void sqexec(unsigned short seq)
     271void sqexec(uint16_t seq)
    272272{
    273         register unsigned short act, dat, line;
     273        register uint16_t act, dat, line;
    274274        register struct seqent *sp;
    275         register short rc;
     275        register int16_t rc;
    276276
    277277        line = seqline[seq];
     
    354354void seqproc(void)
    355355{
    356         register unsigned short oldsr, seq;
    357         register short dspn;
    358         register unsigned short *fp;
    359         char  linbuf[66];
     356        register uint16_t oldsr, seq;
     357        register int16_t dspn;
     358        register uint16_t *fp;
     359        int8_t  linbuf[66];
    360360
    361361        if (0 EQ timers[SQTIMER]) {
Note: See TracChangeset for help on using the changeset viewer.