Changeset 2340de6 in buchla-68k


Ignore:
Timestamp:
07/10/2017 09:06:56 PM (7 years ago)
Author:
Thomas Lopatic <thomas@…>
Branches:
master
Children:
4aa78b2
Parents:
526a993
Message:

Keep macros in external declarations.

Files:
23 edited

Legend:

Unmodified
Added
Removed

  • libcio/filesys.x

    r526a993 r2340de6  
    88
    99#include "biosdefs.h"
     10#include "fspars.h"
    1011#include "stdint.h"
    1112
    … …  
    2425extern  int16_t         _fatmod;
    2526extern  struct  bpb     *_thebpb;
    26 extern  struct  dirent  _thedir[224];
    27 extern  uint16_t        _thefat[7 * 256];
     27extern  struct  dirent  _thedir[MAXDIRNT];
     28extern  uint16_t        _thefat[MAXFAT * WDPSEC];
    2829
    2930/*

  • libcio/fsinit.x

    r526a993 r2340de6  
    1919*/
    2020
    21 extern  FILE            Cbuffs[11];
    22 extern  int32_t         Stdbuf[8][256];
     21extern  FILE            Cbuffs[NSTREAMS];
     22extern  int32_t         Stdbuf[MAXDFILE][BUFSIZL];
    2323extern  int8_t          *Stdbufs;
    24 extern  int8_t          Wrkbuf[512];
     24extern  int8_t          Wrkbuf[BPSEC];
    2525extern  int16_t         _b_sect;
    2626extern  int16_t         _b_side;
    … …  
    2828extern  int16_t         _b_trak;
    2929extern  int16_t         _b_tsec;
    30 extern  struct  fcb     _fcbtab[8];
    31 extern  struct  channel chantab[11];
     30extern  struct  fcb     _fcbtab[MAXDFILE];
     31extern  struct  channel chantab[MAXCHAN];
    3232
    3333/*

  • misc/gen-x.py

    r526a993 r2340de6  
    33from sys import stdout
    44from pycparser import c_ast, parse_file, c_generator
     5from re import escape, subn, search
    56
    67cross_gcc = "/opt/cross-m68k/bin/m68k-none-elf-gcc"
    … …  
    7778    def get_typs(self):
    7879        return self.typs
     80
     81def fix(text, path):
     82    with open(path, "r") as f:
     83        cont = f.read()
     84
     85    (pat, n) = subn(r"\[[0-9]+\]", "[@]", text[7:])
     86
     87    if n == 0:
     88        return text
     89
     90    rex = escape(pat). \
     91         replace("\@", "([0-9A-Z_]+)"). \
     92         replace("\ ", "[\t\n ]+")
     93
     94    m = search(rex, cont)
     95
     96    if not m:
     97        raise Exception("error while matching {}".format(re))
     98
     99    pats = pat.split("@")
     100    vals = m.groups()
     101
     102    if len(pats) != len(vals) + 1:
     103        raise Exception("length mismatch: {} vs. {}". \
     104                        format(len(pats), len(vals)))
     105
     106    out = pats[0]
     107    pats = pats[1:]
     108
     109    while len(pats) > 0:
     110        out += vals[0] + pats[0]
     111        vals = vals[1:]
     112        pats = pats[1:]
     113
     114    return "extern " + out
    79115
    80116gen = c_generator.CGenerator()
    … …  
    130166            decl.init = None
    131167
    132             toks = gen.visit(decl).split(" ")
     168            text = gen.visit(decl)
     169            text = fix(text, decl.coord.file)
     170
     171            toks = text.split(" ")
    133172            alig = ""
    134173

  • misc/proto.x

    r526a993 r2340de6  
    1111#include "slice.h"
    1212#include "stdint.h"
     13#include "timers.h"
    1314#include "vsdd.h"
    1415
    … …  
    4243extern  void            (*pulse1)(void);
    4344extern  void            (*pulse2)(void);
    44 extern  int16_t         timers[8];
     45extern  int16_t         timers[NTIMERS];
    4546extern  int32_t         uldivr;
    4647extern  uint16_t        vi_sadr;

  • ram/asgdsp.c

    r526a993 r2340de6  
    2020
    2121#define AUX_BIT         0x02    /* aux control bit in PSG port B */
    22 
    23 #define AK_WIDTH        115     /* width, in words, of keyboard icon */
    2422
    2523/* 4 bit pixel patterns */

  • ram/asgdsp.x

    r526a993 r2340de6  
    99#include "stdint.h"
    1010
     11#define AK_WIDTH        115     /* width, in words, of keyboard icon */
     12
    1113/*
    1214   =============================================================================
    … …  
    1517*/
    1618
    17 extern  uint16_t        asgkbbt[115];
     19extern  uint16_t        asgkbbt[AK_WIDTH];
    1820extern  int16_t         asgkble[88];
    19 extern  uint16_t        asgkbtp[115];
     21extern  uint16_t        asgkbtp[AK_WIDTH];
    2022extern  int16_t         asgpal[16][3];
    2123extern  int8_t          *asgsrc[];

  • ram/chksec.x

    r526a993 r2340de6  
    1616*/
    1717
    18 extern  int8_t          cmgtags[25];
    19 extern  int8_t          cmgtype[25];
    20 extern  int16_t         cmslens[25];
    21 extern  int16_t         ehdlist[25];
     18extern  int8_t          cmgtags[N_ETYPES];
     19extern  int8_t          cmgtype[N_ETYPES];
     20extern  int16_t         cmslens[N_ETYPES];
     21extern  int16_t         ehdlist[N_ETYPES];
    2222
    2323/*

  • ram/cminit.c

    r526a993 r2340de6  
    1010
    1111#include "ram.h"
    12 
    13 #define CM_MXSTR        257     /* maximum parser string result length */
    1412
    1513#define CM_DBLK         if (!QQanch) while (*QQip EQ ' ') ++QQip

  • ram/cminit.x

    r526a993 r2340de6  
    88
    99#include "stdint.h"
     10
     11#define CM_MXSTR        257     /* maximum parser string result length */
    1012
    1113/*
    … …  
    2325extern  int32_t         QQnum;
    2426extern  int8_t          *QQop;
    25 extern  int8_t          QQstr[257];
     27extern  int8_t          QQstr[CM_MXSTR];
    2628extern  int16_t         QQsw;
    2729

  • ram/configs.h

    r526a993 r2340de6  
    22
    33#include "stdint.h"
    4 
    5 #define MAXCFG  12
    64
    75/* Configuration 0 */
    … …  
    733731};
    734732
    735 int8_t  *cfgptr[MAXCFG] = {
     733int8_t  *cfgptr[12] = {
    736734
    737735        (int8_t *)cfg_00, (int8_t *)cfg_01, (int8_t *)cfg_02, (int8_t *)cfg_03,

  • ram/im700.x

    r526a993 r2340de6  
    1111#include "instdsp.h"
    1212#include "libdsp.h"
     13#include "midas.h"
    1314#include "objdefs.h"
    1415#include "score.h"
    … …  
    3839extern  int16_t         asgmod;
    3940extern  uint16_t        *asgob;
    40 extern  struct  asgent  asgtab[100];
     41extern  struct  asgent  asgtab[NASGS];
    4142extern  int16_t         asig;
    4243extern  int16_t         asmode;
    … …  
    113114extern  int16_t         ext_cv4;
    114115extern  int16_t         ext_mod;
    115 extern  struct  fcat    filecat[20];
     116extern  struct  fcat    filecat[FCMAX];
    116117extern  struct  gdsel   *gdfsep;
    117 extern  struct  gdsel   gdfsl[256];
    118 extern  struct  gdsel   *gdstbc[17];
    119 extern  struct  gdsel   *gdstbn[17];
    120 extern  struct  gdsel   *gdstbp[17];
     118extern  struct  gdsel   gdfsl[MAXFSL];
     119extern  struct  gdsel   *gdstbc[NGDSEL];
     120extern  struct  gdsel   *gdstbn[NGDSEL];
     121extern  struct  gdsel   *gdstbp[NGDSEL];
    121122extern  int16_t         gomode;
    122123extern  int16_t         grp2prt[12][2];
    … …  
    127128extern  int16_t         hitcx;
    128129extern  int16_t         hitcy;
    129 extern  struct  s_entry *hplist[20][12];
     130extern  struct  s_entry *hplist[N_SCORES][N_TYPES];
    130131extern  int16_t         idcfsw;
    131 extern  struct  instdef idefs[41];
     132extern  struct  instdef idefs[NINST];
    132133extern  int16_t         idimsw;
    133134extern  int16_t         idintmp;
    … …  
    172173extern  int16_t         lseqsw;
    173174extern  int16_t         lstbgnc;
    174 extern  struct  n_entry *lstbgns[48];
     175extern  struct  n_entry *lstbgns[NLSTENTS];
    175176extern  int16_t         lstendc;
    176 extern  struct  n_entry *lstends[48];
     177extern  struct  n_entry *lstends[NLSTENTS];
    177178extern  int16_t         lstflag;
    178179extern  int16_t         lstrsw;
    … …  
    197198extern  struct  nevent  *nefree;
    198199extern  struct  nevent  *nelist;
    199 extern  struct  nevent  nevents[32];
     200extern  struct  nevent  nevents[NNEVTS];
    200201extern  int16_t         newflag;
    201202extern  int16_t         nkdown;
    … …  
    241242extern  int16_t         pecase;
    242243extern  struct  s_entry *peg;
    243 extern  struct  pflent  pfents[336];
     244extern  struct  pflent  pfents[NPFENTS];
    244245extern  struct  pflent  *pflist;
    245246extern  struct  pflent  *pfqhdr;
    … …  
    258259extern  int16_t         sbase;
    259260extern  int16_t         scmctl;
    260 extern  struct  s_entry *scores[20];
     261extern  struct  s_entry *scores[N_SCORES];
    261262extern  struct  s_entry *scp;
    262263extern  uint16_t        scrl;
    … …  
    268269extern  int16_t         sdmrow;
    269270extern  int16_t         se;
    270 extern  struct  s_entry *seclist[20][20];
     271extern  struct  s_entry *seclist[N_SCORES][N_SECTS];
    271272extern  int16_t         secop;
    272273extern  int16_t         secopok;
    … …  
    275276extern  int16_t         sharp;
    276277extern  int16_t         sigtab[128][2];
    277 extern  struct  scndx   sindex[20];
     278extern  struct  scndx   sindex[N_SCORES];
    278279extern  struct  s_entry *size1;
    279280extern  struct  s_entry *size2;
    … …  
    291292extern  int16_t         stepint;
    292293extern  int16_t         stepwgt;
    293 extern  struct  s_time  stimes[20][20];
     294extern  struct  s_time  stimes[N_SCORES][N_SECTS];
    294295extern  int16_t         subj;
    295296extern  int16_t         submenu;
    … …  
    332333extern  int16_t         ttsel3;
    333334extern  int16_t         tuneval;
    334 extern  int16_t         tunlib[10][128];
     335extern  int16_t         tunlib[NTUNS][128];
    335336extern  int16_t         tunmod;
    336337extern  uint16_t        *tunob;
    … …  
    345346extern  int16_t         tylast;
    346347extern  int16_t         tystop;
    347 extern  struct  valent  valents[12 << 4];
     348extern  struct  valent  valents[NGPSRS];
    348349extern  int16_t         varmode[8][16];
    349350extern  struct  instdef vbufs[12];
    … …  
    387388extern  int16_t         wpntsv;
    388389extern  int16_t         wshmax;
    389 extern  struct  wstbl   wslib[20];
     390extern  struct  wstbl   wslib[NUMWAVS];
    390391extern  int16_t         wsnmod[12][2];
    391392extern  int16_t         wvlast;

  • ram/initi.x

    r526a993 r2340de6  
    88
    99#include "instdsp.h"
     10#include "midas.h"
    1011#include "stdint.h"
    1112
    … …  
    1819extern  uint16_t        dfltins[];
    1920extern  int16_t         expbit[16];
    20 extern  int16_t         finival[13];
     21extern  int16_t         finival[NFINST];
    2122extern  int16_t         ptoftab[];
    2223

  • ram/instdsp.x

    r526a993 r2340de6  
    77#pragma once
    88
     9#include "midas.h"
    910#include "stdint.h"
    1011
    … …  
    1516*/
    1617
    17 extern  int16_t         fnoff[13];
     18extern  int16_t         fnoff[NFINST];
    1819extern  int16_t         idbox[][8];
    1920extern  int8_t          *idbxlbl[];

  • ram/ptdisp.x

    r526a993 r2340de6  
    2222extern  uint16_t        seqline[16];
    2323extern  uint16_t        seqstim[16];
    24 extern  struct  seqent  seqtab[1000];
     24extern  struct  seqent  seqtab[NSLINES];
    2525extern  uint16_t        seqtime[16];
    2626extern  uint16_t        sregval[16];

  • ram/scwrite.x

    r526a993 r2340de6  
    77#pragma once
    88
     9#include "score.h"
    910#include "stdint.h"
    1011#include "stdio.h"
    … …  
    1718
    1819extern  int32_t         m1con;
    19 extern  int16_t         scsizes[25][2];
     20extern  int16_t         scsizes[N_ETYPES][2];
    2021
    2122/*

  • ram/sedump.x

    r526a993 r2340de6  
    2323extern  int16_t         SL_Flag;
    2424extern  int8_t          *actname[];
    25 extern  int8_t          *evkinds[25];
    26 extern  int8_t          *hpname[12];
     25extern  int8_t          *evkinds[N_ETYPES];
     26extern  int8_t          *hpname[N_TYPES];
    2727extern  int8_t          *srcname[];
    2828extern  int8_t          *var_lbl[6];

  • ram/showcfg.c

    r526a993 r2340de6  
    77
    88#include "ram.h"
    9 
    10 #define MAXPAT          35
    119
    1210#include "configs.h"

  • ram/showcfg.x

    r526a993 r2340de6  
    99#include "fields.h"
    1010#include "stdint.h"
     11
     12#define MAXPAT          35
    1113
    1214/*
    … …  
    3234extern  struct  fet     id_fet3[];
    3335extern  struct  selbox  idmbox[];
    34 extern  uint16_t        pat[35][16];
    35 extern  int16_t         patctab[35];
     36extern  uint16_t        pat[MAXPAT][16];
     37extern  int16_t         patctab[MAXPAT];
    3638
    3739/*

  • ram/stmproc.x

    r526a993 r2340de6  
    1717*/
    1818
    19 extern  struct  defent  defents[256];
    20 extern  int8_t          defptr[5120];
     19extern  struct  defent  defents[RAWDEFS];
     20extern  int8_t          defptr[NDEFSTMS];
    2121extern  int8_t          dmatch[];
    2222extern  uint16_t        dpecpos;
    … …  
    2424extern  uint16_t        dpesucc;
    2525extern  uint16_t        dtfree;
    26 extern  struct  patch   patches[256];
     26extern  struct  patch   patches[MAXPATCH];
    2727extern  int8_t          ptdsbuf[50];
    2828extern  struct  wordq   ptefifo;
    29 extern  uint16_t        ptewrds[256];
     29extern  uint16_t        ptewrds[NPTEQELS];
    3030extern  uint16_t        ptfree;
    31 extern  int8_t          stmptr[5120];
     31extern  int8_t          stmptr[NDEFSTMS];
    3232
    3333/*

  • ram/swinit.c

    r526a993 r2340de6  
    110110int8_t  ebuf[MAXEBUF+1];        /* edit data entry buffer */
    111111int8_t  errbuf[65];             /* error message build area */
    112 int8_t  idbuf[91];              /* display format conversion work area */
     112int8_t  idbuf[65];              /* display format conversion work area */
    113113int8_t  keystat[24];            /* front panel key status */
    114114int8_t  ldcmnt[38];             /* comment field */

  • ram/swinit.x

    r526a993 r2340de6  
    77#pragma once
    88
     9#include "fields.h"
     10#include "libdsp.h"
    911#include "midas.h"
     12#include "score.h"
     13#include "scwheel.h"
    1014#include "stddefs.h"
    1115#include "stdint.h"
    … …  
    4549extern  int32_t         dvwork;
    4650extern  void            (*e_key)(void);
    47 extern  int8_t          ebuf[80 + 1];
     51extern  int8_t          ebuf[MAXEBUF+1];
    4852extern  int8_t          errbuf[65];
    4953extern  int32_t         frags;
    … …  
    5660extern  int16_t         grptmap[12];
    5761extern  int16_t         gtctab[12];
    58 extern  int32_t         hwave[256];
    59 extern  int8_t          idbuf[91];
     62extern  int32_t         hwave[NUMWPCAL];
     63extern  int8_t          idbuf[65];
    6064extern  int16_t         ins2grp[12];
    6165extern  int16_t         instmod[12];
    … …  
    7276extern  int8_t          ldcmnt[38];
    7377extern  int8_t          ldfile[9];
    74 extern  int16_t         ldmap[20];
     78extern  int16_t         ldmap[N_SCORES];
    7579extern  int8_t          ldmsg1[65];
    7680extern  int8_t          ldmsg2[65];
    … …  
    7983extern  int8_t          *lmln23;
    8084extern  int8_t          *lmln24;
    81 extern  int8_t          loadedc[8][37];
    82 extern  int8_t          loadedf[8][8];
     85extern  int8_t          loadedc[NLTYPES][37];
     86extern  int8_t          loadedf[NLTYPES][8];
    8387extern  void            (*m_key)(void);
    8488extern  int8_t          masens[3];
    8589extern  int16_t         mctlnum[4];
    86 extern  int8_t          mctlval[6144];
     90extern  int8_t          mctlval[NCTRLS];
    8791extern  int8_t          mdbyte[3];
    8892extern  int16_t         mpbend[48];
    … …  
    9195extern  int16_t         msmstv[3];
    9296extern  int32_t         ndbytes;
    93 extern  int32_t         nlpersc[20];
     97extern  int32_t         nlpersc[N_SCORES];
    9498extern  int16_t         (*not_fld)(int16_t k);
    9599extern  int32_t         noteoff;
    … …  
    98102extern  int32_t         noteval;
    99103extern  int32_t         nrest;
    100 extern  int16_t         offsets[256];
     104extern  int16_t         offsets[NUMWPCAL];
    101105extern  void            (*olddkey)(int16_t k);
    102106extern  void            (*oldekey)(void);
    … …  
    106110extern  void            (*oldxkey)(void);
    107111extern  void            (*premove)(void);
    108 extern  int16_t         prstab[6144];
     112extern  int16_t         prstab[NTRIGS];
    109113extern  int32_t         *pspool;
    110114extern  void            (*pstmove)(void);
    … …  
    112116extern  int16_t         s_trns[12];
    113117extern  int32_t         schksum;
    114 extern  int8_t          scname[20][16];
    115 extern  int32_t         scsums[20];
     118extern  int8_t          scname[N_SCORES][16];
     119extern  int32_t         scsums[N_SCORES];
    116120extern  int32_t         se1_cnt;
    117121extern  int32_t         se2_cnt;
    … …  
    123127extern  int32_t         sntlreq;
    124128extern  int32_t         spcount;
    125 extern  int32_t         spool[32768L];
     129extern  int32_t         spool[MAX_SE];
    126130extern  int32_t         swcount;
    127 extern  int16_t         swfifo[100];
     131extern  int16_t         swfifo[NSWFIFO];
    128132extern  LPF             (*swpt)[];
    129133extern  int32_t         swrate;
    … …  
    143147extern  int32_t         t_sect;
    144148extern  int32_t         t_send;
    145 extern  int8_t          trgtab[6144];
     149extern  int8_t          trgtab[NTRIGS];
    146150extern  int8_t          tuncurn[33];
    147 extern  int8_t          tunname[10][32];
     151extern  int8_t          tunname[NTUNS][32];
    148152extern  int16_t         tuntab[128];
    149 extern  int16_t         txfifo[100];
    150 extern  int16_t         tyfifo[100];
     153extern  int16_t         txfifo[NTKFIFO];
     154extern  int16_t         tyfifo[NTKFIFO];
    151155extern  int16_t         vce2grp[12];
    152156extern  int16_t         vce2trg[12];
    153 extern  int16_t         veltab[6144];
    154 extern  int32_t         vknm[32][256];
     157extern  int16_t         veltab[NTRIGS];
     158extern  int32_t         vknm[NUMHARM][NUMWPCAL];
    155159extern  int8_t          *vlbptr[3];
    156 extern  int16_t         vmtab[32];
     160extern  int16_t         vmtab[NUMHARM];
    157161extern  void            (*vt_adv)(void);
    158162extern  void            (*vt_bsp)(void);
    … …  
    162166extern  void            (*vt_stop)(void);
    163167extern  int8_t          *vtdeptr;
    164 extern  int16_t         wsbuf[256];
     168extern  int16_t         wsbuf[NUMWPCAL];
    165169extern  int32_t         wshfac;
    166170extern  void            (*x_key)(void);

  • rom/romp.c

    r526a993 r2340de6  
    7070#define ROMADDR         0x00100000L
    7171
    72 #define MAXFNLN         13              /* xxxxxxxx.xxx + CR */
    73 #define MAXARGLN        80              /* maximum argument length */
    74 #define MAXCMDLN        128             /* maximum command line length */
    75 #define MAXHS           80              /* maximum help string length */
    76 #define MAXID           90              /* maximum ID string length */
    77 
    78 #define PDATELN         14
    7972#define PRM_DATE        0x0100008L
    8073#define PRM_VERS        0x0100002L

  • rom/romp.x

    r526a993 r2340de6  
    1010#include "setjmp.h"
    1111#include "stdint.h"
     12
     13#define MAXFNLN         13              /* xxxxxxxx.xxx + CR */
     14#define MAXARGLN        80              /* maximum argument length */
     15#define MAXCMDLN        128             /* maximum command line length */
     16#define MAXHS           80              /* maximum help string length */
     17#define MAXID           90              /* maximum ID string length */
     18
     19#define PDATELN         14
    1220
    1321/*
    … …  
    2331extern  int16_t         argln;
    2432extern  int8_t          argsep;
    25 extern  int8_t          argstr[80 + 1];
     33extern  int8_t          argstr[MAXARGLN+1];
    2634extern  int16_t         asig;
    2735extern  int16_t         astat;
    … …  
    3240extern  uint16_t        baron;
    3341extern  int16_t         baseled;
    34 extern  int8_t          bfname[13 + 1];
    35 extern  int8_t          cmdline[128 + 1];
     42extern  int8_t          bfname[MAXFNLN+1];
     43extern  int8_t          cmdline[MAXCMDLN+1];
    3644extern  int16_t         cmdunit;
    3745extern  int8_t          *d_cur;
    … …  
    4351extern  int32_t         ftimer;
    4452extern  int16_t         goflag;
    45 extern  int8_t          hs_mtst[80 + 1];
    46 extern  int8_t          idbuf[90 + 1];
     53extern  int8_t          hs_mtst[MAXHS+1];
     54extern  int8_t          idbuf[MAXID+1];
    4755extern  int16_t         ilast;
    4856extern  int16_t         inext;
    … …  
    6371extern  int32_t         p_value;
    6472extern  int32_t         p_width;
    65 extern  int8_t          promdate[14 + 1];
     73extern  int8_t          promdate[PDATELN+1];
    6674extern  int16_t         redo;
    6775extern  struct  regs    *regptr;
Note: See TracChangeset for help on using the changeset viewer.