Changeset 7258c6a in buchla-68k for ram/msl.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/msl.c

    r0292fbb r7258c6a  
    5858extern  void    (*cx_key)(void);
    5959extern  void    (*cy_key)(void);
    60 extern  void    (*d_key)(short k);
     60extern  void    (*d_key)(int16_t k);
    6161extern  void    (*e_key)(void);
    6262extern  void    (*m_key)(void);
    … …  
    6565extern  LPF     (*swpt)[];
    6666
    67 extern  short   aflag;
    68 extern  short   amplval;
    69 extern  short   ancmsw;
    70 extern  short   angroup;
    71 extern  short   asig;
    72 extern  short   astat;
    73 extern  short   aval;
    74 extern  short   clkctl;
    75 extern  short   clkrun;
    76 extern  short   ctrsw;
    77 extern  short   cxrate;
    78 extern  short   cxval;
    79 extern  short   cyrate;
    80 extern  short   cyval;
    81 extern  short   dsp_ok;
    82 extern  short   editss;
    83 extern  short   editsw;
    84 extern  short   lampsw;
    85 extern  short   ndisp;
    86 extern  short   nxtflag;
    87 extern  short   pchsw;
    88 extern  short   recsw;
    89 extern  short   runit;
    90 extern  short   swback;
    91 extern  short   swctrl;
    92 extern  short   swdelta;
    93 extern  short   swdir;
    94 extern  short   swfiin;
    95 extern  short   swflag;
    96 extern  short   swlast;
    97 extern  short   swndx;
    98 extern  short   swstop;
    99 extern  short   swthr;
    100 extern  short   swtime;
    101 extern  short   swwait;
    102 extern  short   sd;
    103 extern  short   se;
    104 extern  short   stcrow;
    105 extern  short   stccol;
    106 extern  short   tglclk;
    107 extern  short   tglpch;
    108 extern  short   timemlt;
    109 extern  short   tmpomlt;
    110 extern  short   tmpoval;
    111 extern  short   tuneval;
    112 extern  short   vtpcol;
    113 extern  short   vtprow;
    114 
    115 /*
    116 
    117 */
    118 
    119 extern  unsigned        *obj8;
    120 
    121 extern  long    afi;
    122 extern  long    lcdtime;
    123 extern  long    swcount;
    124 extern  long    swrate;
    125 extern  long    swrmin;
    126 extern  long    swtemp;
    127 
    128 extern  short   grpmode[];
    129 extern  short   grpstat[];
    130 extern  short   prstab[];
    131 extern  short   simled[];
    132 extern  short   swfifo[NSWFIFO];
    133 extern  short   tmultab[];
    134 extern  short   vce2trg[];
    135 extern  short   veltab[];
    136 
    137 extern  char    trgtab[];
    138 
    139 extern  short   grp2prt[][2];
    140 extern  short   sigtab[][2];
    141 extern  short   varmode[][16];
     67extern  int16_t aflag;
     68extern  int16_t amplval;
     69extern  int16_t ancmsw;
     70extern  int16_t angroup;
     71extern  int16_t asig;
     72extern  int16_t astat;
     73extern  int16_t aval;
     74extern  int16_t clkctl;
     75extern  int16_t clkrun;
     76extern  int16_t ctrsw;
     77extern  int16_t cxrate;
     78extern  int16_t cxval;
     79extern  int16_t cyrate;
     80extern  int16_t cyval;
     81extern  int16_t dsp_ok;
     82extern  int16_t editss;
     83extern  int16_t editsw;
     84extern  int16_t lampsw;
     85extern  int16_t ndisp;
     86extern  int16_t nxtflag;
     87extern  int16_t pchsw;
     88extern  int16_t recsw;
     89extern  int16_t runit;
     90extern  int16_t swback;
     91extern  int16_t swctrl;
     92extern  int16_t swdelta;
     93extern  int16_t swdir;
     94extern  int16_t swfiin;
     95extern  int16_t swflag;
     96extern  int16_t swlast;
     97extern  int16_t swndx;
     98extern  int16_t swstop;
     99extern  int16_t swthr;
     100extern  int16_t swtime;
     101extern  int16_t swwait;
     102extern  int16_t sd;
     103extern  int16_t se;
     104extern  int16_t stcrow;
     105extern  int16_t stccol;
     106extern  int16_t tglclk;
     107extern  int16_t tglpch;
     108extern  int16_t timemlt;
     109extern  int16_t tmpomlt;
     110extern  int16_t tmpoval;
     111extern  int16_t tuneval;
     112extern  int16_t vtpcol;
     113extern  int16_t vtprow;
     114
     115/*
     116
     117*/
     118
     119extern  uint16_t        *obj8;
     120
     121extern  int32_t afi;
     122extern  int32_t lcdtime;
     123extern  int32_t swcount;
     124extern  int32_t swrate;
     125extern  int32_t swrmin;
     126extern  int32_t swtemp;
     127
     128extern  int16_t grpmode[];
     129extern  int16_t grpstat[];
     130extern  int16_t prstab[];
     131extern  int16_t simled[];
     132extern  int16_t swfifo[NSWFIFO];
     133extern  int16_t tmultab[];
     134extern  int16_t vce2trg[];
     135extern  int16_t veltab[];
     136
     137extern  int8_t  trgtab[];
     138
     139extern  int16_t grp2prt[][2];
     140extern  int16_t sigtab[][2];
     141extern  int16_t varmode[][16];
    142142
    143143extern  struct  gdsel   *gdstbc[];
    … …  
    145145extern  struct  wordq   ptefifo;
    146146
    147 unsigned short fifoval;
     147uint16_t fifoval;
    148148
    149149/*
    … …  
    157157*/
    158158
    159 void clk_ped(short stat)
     159void clk_ped(int16_t stat)
    160160{
    161161        if (stat)
    … …  
    169169*/
    170170
    171 void pch_ped(short stat)
     171void pch_ped(int16_t stat)
    172172{
    173173        if (stat AND pchsw)
    … …  
    187187void msl(void)
    188188{
    189         register char *ioadr;
    190         register unsigned *fpu;
     189        register int8_t *ioadr;
     190        register uint16_t *fpu;
    191191        register struct s_entry *ep;
    192         register short i, ti, val;
    193         register long rt;
    194         unsigned short chan, crel, oldsr, port, trg, trig, vel;
    195         short cxprev, cyprev, esi, newsig, oldclk, oldrec;
    196         long fctemp;
     192        register int16_t i, ti, val;
     193        register int32_t rt;
     194        uint16_t chan, crel, oldsr, port, trg, trig, vel;
     195        int16_t cxprev, cyprev, esi, newsig, oldclk, oldrec;
     196        int32_t fctemp;
    197197
    198198#if     DEBUGIT
    … …  
    398398                                                                                ep->e_type = EV_ANVL;
    399399                                                                                ep->e_data1 = i;
    400                                                                                 ep->e_dn = (struct s_entry *)((long)val << 16);
     400                                                                                ep->e_dn = (struct s_entry *)((int32_t)val << 16);
    401401                                                                                p_cur = e_ins(ep, ep_adj(p_cur, 0, t_cur))->e_fwd;
    402402                                                                                ctrsw = TRUE;
    … …  
    435435                                                                                ep->e_type = EV_ANVL;
    436436                                                                                ep->e_data1 = 0x0010 | i;
    437                                                                                 ep->e_dn = (struct s_entry *)((long)val << 16);
     437                                                                                ep->e_dn = (struct s_entry *)((int32_t)val << 16);
    438438                                                                                p_cur = e_ins(ep, ep_adj(p_cur, 0, t_cur))->e_fwd;
    439439                                                                                ctrsw = TRUE;
    … …  
    480480                                                                                ep->e_type = EV_ANVL;
    481481                                                                                ep->e_data1 = 0x0020 | i;
    482                                                                                 ep->e_dn = (struct s_entry *)((long)val << 16);
     482                                                                                ep->e_dn = (struct s_entry *)((int32_t)val << 16);
    483483                                                                                p_cur = e_ins(ep, ep_adj(p_cur, 0, t_cur))->e_fwd;
    484484                                                                                ctrsw = TRUE;
    … …  
    543543#else
    544544                                        ti  = (tmpomlt + 50) * tmpoval;
    545                                         ti  = (short)( (19200000L / ti) - 1);
     545                                        ti  = (int16_t)( (19200000L / ti) - 1);
    546546#endif
    547547                                        TIME_T2H = ti >> 8;
    … …  
    661661                                                                                ep->e_type = EV_ANVL;
    662662                                                                                ep->e_data1 = 0x0040 | i;
    663                                                                                 ep->e_dn = (struct s_entry *)((long)val << 16);
     663                                                                                ep->e_dn = (struct s_entry *)((int32_t)val << 16);
    664664                                                                                p_cur = e_ins(ep, ep_adj(p_cur, 0, t_cur))->e_fwd;
    665665                                                                                ctrsw = TRUE;
    … …  
    699699                                                                                ep->e_type = EV_ANVL;
    700700                                                                                ep->e_data1 = 0x0030 | i;
    701                                                                                 ep->e_dn = (struct s_entry *)((long)val << 16);
     701                                                                                ep->e_dn = (struct s_entry *)((int32_t)val << 16);
    702702                                                                                p_cur = e_ins(ep, ep_adj(p_cur, 0, t_cur))->e_fwd;
    703703                                                                                ctrsw = TRUE;
Note: See TracChangeset for help on using the changeset viewer.