Changeset 60288f5 in buchla-68k for ram/adselbx.c


Ignore:
Timestamp:
07/09/2017 12:23:40 AM (7 years ago)
Author:
Thomas Lopatic <thomas@…>
Branches:
master
Children:
6dd74a9
Parents:
0c834c5
Message:

Make function pointers more consistent.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • ram/adselbx.c

    r0c834c5 r60288f5  
    2525#define ATDECOL 1               /* data entry base column */
    2626
    27 extern  void    enterit(void);
     27extern  short   entbh(short n);
    2828extern  void    adswin(short n);
    2929extern  void    advacur(void);
    3030extern  void    bspacur(void);
    31 extern  short   nokey(void);
     31extern  void    nokey(void);
    3232extern  void    vtdisp(unsigned *obj, unsigned fg, unsigned bg, short row, short col, char *buf);
    3333extern  void    adpoint(short x, short y, short pen);
    … …  
    7070
    7171short   bx_null(void);
    72 void    adfnbox(short n);
     72short   adfnbox(short n);
    7373
    7474/*
    … …  
    8080        {  1,   0,  94,  27,      0, adfnbox},  /*  0:  curasg, caname */
    8181        {  1,  28,  94,  40,      1, adfnbox},  /*  1:  asgtab[curasg] */
    82         {  1,  56,  94,  68,      2, enterit},  /*  2:  curmop */
    83         {  1,  42,  94,  54,      3, enterit},  /*  3:  prgchan */
    84         { 96,   1, 190, 138,      4, enterit},  /*  4:  vce2grp[voice] */
     82        {  1,  56,  94,  68,      2, entbh},    /*  2:  curmop */
     83        {  1,  42,  94,  54,      3, entbh},    /*  3:  prgchan */
     84        { 96,   1, 190, 138,      4, entbh},    /*  4:  vce2grp[voice] */
    8585        {192,   1, 302, 138,      5, adfnbox},  /*  5:  mctlnum[srcvar] */
    8686        {304,   1, 510, 138,      6, adfnbox},  /*  6:  grp2prt[group][pt|ch] */
    … …  
    8888        {  1,  70,  38,  82,      8, adfnbox},  /*  8:  auxctl */
    8989        { 40,  70,  94,  82,      9, adfnbox},  /*  9:  curtun */
    90         {  1,  84,  94, 138,     10, enterit},  /* 10:  ps_intn, ps_rate, ps_dpth */
     90        {  1,  84,  94, 138,     10, entbh},    /* 10:  ps_intn, ps_rate, ps_dpth */
    9191
    9292        {  0,   0,   0,   0,      0, FN_NULL}           /* end of table */
    … …  
    207207*/
    208208
    209 void adfnbox(short n)
     209short adfnbox(short n)
    210210{
    211211        register short i, grp, key, line;
    … …  
    242242                                }
    243243
    244                                 return;
     244                                return(SUCCESS);
    245245
    246246                        } else {                                /* table */
    247247
    248                                 enterit();      /* data entry */
    249                                 return;
     248                                return(entbh(-1));      /* data entry */
    250249                        }
    251250                }
    … …  
    303302                }
    304303
    305                 return;
     304                return(SUCCESS);
    306305/*
    307306
    … …  
    316315                        putasg(curasg);
    317316                        adswin(0);
    318                         return;
     317                        return(SUCCESS);
    319318
    320319                } else if ((col GE 6) AND (col LE 10)) {        /* retrieve */
    … …  
    322321                        getasg(curasg);
    323322                        awins();
    324                         return;
     323                        return(SUCCESS);
    325324                }
    326325
    … …  
    330329
    331330                        if ((row LT 5) OR (row GT 8))
    332                                 return;
     331                                return(FAILURE);
    333332
    334333                        mctlnum[row - 5] ^= GTAG1;
    … …  
    345344                                row, adbox[n][7], bfs, 14);
    346345
    347                         return;
     346                        return(SUCCESS);
    348347
    349348                } else {
    350349
    351                         enterit();
    352                         return;
     350                        return(entbh(-1));
    353351                }
    354352/*
    … …  
    367365                                admenu(-1);     /* take down menu */
    368366
    369                         return;
     367                        return(SUCCESS);
    370368
    371369                } else if (col EQ 39) { /* groups 1..6 */
    372370
    373371                        if ((row LT 4) OR (row GT 9))
    374                                 return;
     372                                return(FAILURE);
    375373
    376374                        /* toggle "legato" mode */
    … …  
    390388                               row, col, bfs, 14);
    391389
    392                         return;
     390                        return(SUCCESS);
    393391/*
    394392
    … …  
    415413                               row, col, bfs, 14);
    416414
    417                         return;
     415                        return(SUCCESS);
    418416
    419417                } else {
    420418
    421                         enterit();      /* data entry */
    422                         return;
     419                        return(entbh(-1));      /* data entry */
    423420                }
    424421/*
    … …  
    428425
    429426                if (admctl NE -1)
    430                         return;
     427                        return(FAILURE);
    431428
    432429                if (asghit) {
    … …  
    446443
    447444                                if (key-- EQ 0)
    448                                         return;
     445                                        return(FAILURE);
    449446
    450447                                if (key LT asgfks) {
    … …  
    487484
    488485                                asghit = 0;
    489                                 return;
     486                                return(FAILURE);
    490487                        }
    491488
    … …  
    501498
    502499                                asghit = 0;
    503                                 return;
     500                                return(FAILURE);
    504501                        }
    505502
    … …  
    512509                }
    513510
    514                 return;
     511                return(SUCCESS);
    515512
    516513        case 8:                 /* aux ctl */
    … …  
    518515                setaux(NOT auxctl);
    519516                adswin(8);
    520                 return;
     517                return(SUCCESS);
    521518
    522519        case 9:                 /* tuning menu */
    … …  
    529526                                admenu(-1);     /* take down menu */
    530527
    531                         return;
     528                        return(SUCCESS);
    532529
    533530                } else {
    534531
    535                         enterit();      /* data entry */
    536                         return;
     532                        return(entbh(-1));      /* data entry */
    537533                }
    538534        }
     535
     536        return(FAILURE);
    539537}
    540 
Note: See TracChangeset for help on using the changeset viewer.