Changeset 66072f0 in buchla-68k for ram


Ignore:
Timestamp:
11/12/2017 05:38:55 PM (6 years ago)
Author:
Thomas Lopatic <thomas@…>
Branches:
master
Children:
018d7ba
Parents:
2a87ef3
Message:

Fixed sqscan.c.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ram/sqscan.c

    r2a87ef3 r66072f0  
    9999{
    100100        nsp->e_time  = t_cur;
    101         nsp->e_type  = nt;
    102         nsp->e_note  = note;
    103         nsp->e_group = grp;
     101        nsp->e_type  = (int8_t)nt;
     102        nsp->e_note  = (int8_t)note;
     103        nsp->e_group = (int8_t)grp;
    104104        nsp->e_vel   = vel;
    105105
    … …  
    131131                        CM_NOGO;
    132132
    133                 curgrp = QQnum;
     133                curgrp = (int16_t)QQnum;
    134134
    135135                if (verbose)
    … …  
    155155                        tsp1->e_time  = t_cur;
    156156                        tsp1->e_type  = EV_GRP;
    157                         tsp1->e_data1 = curgrp;
     157                        tsp1->e_data1 = (int8_t)curgrp;
    158158                        tsp1->e_data2 = GS_ENBL;
    159159
    … …  
    176176                        tsp1->e_time  = t_cur;
    177177                        tsp1->e_type  = EV_GRP;
    178                         tsp1->e_data1 = curgrp;
     178                        tsp1->e_data1 = (int8_t)curgrp;
    179179                        tsp1->e_data2 = GS_DSBL;
    180180
    … …  
    200200                        CM_NOGO;
    201201
    202                 aux1 = QQnum;
     202                aux1 = (int16_t)QQnum;
    203203
    204204                if (E_NULL EQ (tsp1 = e_alc(E_SIZE2))) {
    … …  
    210210                tsp1->e_time  = t_cur;
    211211                tsp1->e_type  = EV_TMPO;
    212                 tsp1->e_data1 = aux1;
     212                tsp1->e_data1 = (int8_t)aux1;
    213213
    214214                p_cur = e_ins(tsp1, ep_adj(p_cur, 0, t_cur))->e_fwd;
    … …  
    228228                        CM_NOGO;
    229229
    230                 aux1 = QQnum;
     230                aux1 = (int16_t)QQnum;
    231231
    232232                if (E_NULL EQ (tsp1 = e_alc(E_SIZE2))) {
    … …  
    238238                tsp1->e_time  = t_cur;
    239239                tsp1->e_type  = EV_INST;
    240                 tsp1->e_data1 = curgrp;
    241                 tsp1->e_data2 = aux1;
     240                tsp1->e_data1 = (int8_t)curgrp;
     241                tsp1->e_data2 = (int8_t)aux1;
    242242
    243243                p_cur = e_ins(tsp1, ep_adj(p_cur, 0, t_cur))->e_fwd;
    … …  
    258258                        CM_NOGO;
    259259
    260                 aux1 = QQnum;
     260                aux1 = (int16_t)QQnum;
    261261
    262262                if (E_NULL EQ (tsp1 = e_alc(E_SIZE2))) {
    … …  
    268268                tsp1->e_time  = t_cur;
    269269                tsp1->e_type  = EV_TUNE;
    270                 tsp1->e_data1 = aux1;
     270                tsp1->e_data1 = (int8_t)aux1;
    271271
    272272                p_cur = e_ins(tsp1, ep_adj(p_cur, 0, t_cur))->e_fwd;
    … …  
    293293                        CM_NOGO;
    294294
    295                 aux1 = QQnum;
     295                aux1 = (int16_t)QQnum;
    296296
    297297                if (QQchr EQ '-')
    … …  
    306306                tsp1->e_time  = t_cur;
    307307                tsp1->e_type  = EV_TRNS;
    308                 tsp1->e_data1 = curgrp;
     308                tsp1->e_data1 = (int8_t)curgrp;
    309309                tsp1->e_lft = (struct s_entry *)aux1;
    310310
    … …  
    326326                        CM_NOGO;
    327327
    328                 aux1 = QQnum;
     328                aux1 = (int16_t)QQnum;
    329329
    330330                if (E_NULL EQ (tsp1 = e_alc(E_SIZE2))) {
    … …  
    336336                tsp1->e_time  = t_cur;
    337337                tsp1->e_type  = EV_DYN;
    338                 tsp1->e_data1 = curgrp;
    339                 tsp1->e_data2 = aux1;
     338                tsp1->e_data1 = (int8_t)curgrp;
     339                tsp1->e_data2 = (int8_t)aux1;
    340340
    341341                p_cur = e_ins(tsp1, ep_adj(p_cur, 0, t_cur))->e_fwd;
    … …  
    355355                        CM_NOGO;
    356356
    357                 aux1 = QQnum;
     357                aux1 = (int16_t)QQnum;
    358358
    359359                if (E_NULL EQ (tsp1 = e_alc(E_SIZE2))) {
    … …  
    365365                tsp1->e_time  = t_cur;
    366366                tsp1->e_type  = EV_LOCN;
    367                 tsp1->e_data1 = curgrp;
    368                 tsp1->e_data2 = aux1;
     367                tsp1->e_data1 = (int8_t)curgrp;
     368                tsp1->e_data2 = (int8_t)aux1;
    369369
    370370                p_cur = e_ins(tsp1, ep_adj(p_cur, 0, t_cur))->e_fwd;
    … …  
    467467                        CM_NOGO;
    468468
    469                 thescore = QQnum;
     469                thescore = (int16_t)QQnum;
    470470
    471471                selscor(thescore);
    … …  
    529529                if (CM_NUM) {
    530530
    531                         aux1 = QQnum;
     531                        aux1 = (int16_t)QQnum;
    532532                        sc_clr(aux1);
    533533
Note: See TracChangeset for help on using the changeset viewer.