git.gag.com Git - fw/sdcc/blob - as/hc08/asm.h

   1 /* asm.h */
   2
   3 /*
   4  * (C) Copyright 1989-1995
   5  * All Rights Reserved
   6  *
   7  * Alan R. Baldwin
   8  * 721 Berkeley St.
   9  * Kent, Ohio  44240
  10  *
  11  * 28-Oct-97 JLH:
  12  *           - add proto for StoreString
  13  *           - change s_id from [NCPS] to pointer
  14  *           - change m_id from [NCPS] to pointer
  15  *           - change NCPS to 80
  16  *           - case sensitive
  17  *           - add R_J11 for 8051 assembler
  18  *           - add outr11 prototype for 8051 assembler
  19  *           - always define "ccase"
  20  *  2-Nov-97 JLH:
  21  *           - add jflag for debug control
  22  *           - prototypes for DefineNoICE_Line
  23  * 30-Jan-98 JLH:
  24  *           - add memory space flags to a_flag for 8051
  25  *
  26  *  3-Feb-00 KV:
  27  *           - add DS80C390 flat mode support.
  28  */
  29
  30 #define VERSION "V01.70 + NoICE + SDCC mods + Flat24 Feb-1999"
  31
  32 #if !defined(__BORLANDC__) && !defined(_MSC_VER)
  33 #include <unistd.h>
  34 #endif
  35
  36 /*
  37  * Case Sensitivity Flag
  38  */
  39 #define CASE_SENSITIVE  1
  40
  41 /*)Module       asm.h
  42  *
  43  *      The module asm.h contains the definitions for constants,
  44  *      structures, global variables, and ASxxxx functions
  45  *      contained in the ASxxxx.c files.  The two functions
  46  *      and three global variables from the machine dependent
  47  *      files are also defined.
  48  */
  49
  50 /*
  51  *       compiler/operating system specific definitions
  52  */
  53
  54 /* DECUS C void definition */
  55 /* File/extension seperator */
  56
  57 #ifdef  decus
  58 #define VOID    char
  59 #define FSEPX   '.'
  60 #endif
  61
  62 /* PDOS C void definition */
  63 /* File/extension seperator */
  64
  65 #ifdef  PDOS
  66 #define VOID    char
  67 #define FSEPX   ':'
  68 #endif
  69
  70 /* Default void definition */
  71 /* File/extension seperator */
  72
  73 #ifndef VOID
  74 #define VOID    void
  75 #define FSEPX   '.'
  76 #define OTHERSYSTEM
  77 #endif
  78
  79 /*
  80  * PATH_MAX
  81  */
  82 #include <limits.h>
  83 #ifndef PATH_MAX                                /* POSIX, but not required   */
  84 #if defined(_MSC_VER) || defined(__BORLANDC__)  /* Microsoft C or Borland C*/
  85 #include <stdlib.h>
  86 #define PATH_MAX        _MAX_PATH
  87 #else
  88 #define PATH_MAX                                /* define a reasonable value */
  89 #endif
  90 #endif
  91
  92 #ifdef _WIN32       /* WIN32 native */
  93
  94 #  define NATIVE_WIN32          1
  95 #  ifdef __MINGW32__  /* GCC MINGW32 depends on configure */
  96 #    include "../../sdccconf.h"
  97 #  else
  98 #    include "../../sdcc_vc.h"
  99 #    define PATH_MAX  _MAX_PATH
 100 #  endif
 101
 102 #else               /* Assume Un*x style system */
 103 #  include "../../sdccconf.h"
 104 #endif
 105
 106 /*
 107  * Assembler definitions.
 108  */
 109 #define LFTERM  '('                     /* Left expression delimeter */
 110 #define RTTERM  ')'                     /* Right expression delimeter */
 111
 112 #define NCPS    80                      /* Chars. per symbol (JLH: change from 8) */
 113 #define HUGE    1000                    /* A huge number */
 114 #define NERR    3                       /* Errors per line */
 115 #define NINPUT  1024                    /* Input buffer size (icodes need space) */
 116 #define NCODE   128                     /* Listing code buffer size */
 117 #define NTITL   64                      /* Title buffer size */
 118 #define NSBTL   64                      /* SubTitle buffer size */
 119 #define NHASH   64                      /* Buckets in hash table */
 120 #define HMASK   077                     /* Hash mask */
 121 #define NLPP    60                      /* Lines per page */
 122 #define MAXFIL  6                       /* Maximum command line input files */
 123 #define MAXINC  6                       /* Maximum nesting of include files */
 124 #define MAXIF   10                      /* Maximum nesting of if/else/endif */
 125
 126 #define NLIST   0                       /* No listing */
 127 #define SLIST   1                       /* Source only */
 128 #define ALIST   2                       /* Address only */
 129 #define BLIST   3                       /* Address only with allocation */
 130 #define CLIST   4                       /* Code */
 131 #define ELIST   5                       /* Equate only */
 132
 133 #define dot     sym[0]                  /* Dot, current loc */
 134 #define dca     area[0]                 /* Dca, default code area */
 135
 136
 137 /* NB: for Flat24 extentions to work, Addr_T must be at least 24
 138  * bits. This is checked at runtime when the .flat24 directive
 139  * is processed.
 140  */
 141 typedef unsigned int Addr_T;
 142
 143 /*
 144  *      The area structure contains the parameter values for a
 145  *      specific program or data section.  The area structure
 146  *      is a linked list of areas.  The initial default area
 147  *      is "_CODE" defined in asdata.c, the next area structure
 148  *      will be linked to this structure through the structure
 149  *      element 'struct area *a_ap'.  The structure contains the
 150  *      area name, area reference number ("_CODE" is 0) determined
 151  *      by the order of .area directives, area size determined
 152  *      from the total code and/or data in an area, area fuzz is
 153  *      a variable used to track pass to pass changes in the
 154  *      area size caused by variable length instruction formats,
 155  *      and area flags which specify the area's relocation type.
 156  */
 157 struct  area
 158 {
 159         struct  area *a_ap;             /* Area link */
 160         char    a_id[NCPS];             /* Area Name */
 161         int     a_ref;                  /* Ref. number */
 162         Addr_T  a_addr;                 /* Area address */
 163         Addr_T  a_size;                 /* Area size */
 164         Addr_T  a_fuzz;                 /* Area fuzz */
 165         int     a_flag;                 /* Area flags */
 166 };
 167
 168 /*
 169  *      The "A_" area constants define values used in
 170  *      generating the assembler area output data.
 171  *
 172  * Area flags
 173  *
 174  *         7     6      5    4     3     2     1     0
 175  *      +-----+-----+-----+-----+-----+-----+-----+-----+
 176  *      | BIT |XDATA|DATA | PAG | ABS | OVR |     |     |
 177  *      +-----+-----+-----+-----+-----+-----+-----+-----+
 178  */
 179
 180 #define A_CON   0000                    /* Concatenating */
 181 #define A_OVR   0004                    /* Overlaying */
 182 #define A_REL   0000                    /* Relocatable */
 183 #define A_ABS   0010                    /* absolute */
 184 #define A_NOPAG 0000                    /* Non-Paged */
 185 #define A_PAG   0020                    /* Paged */
 186
 187 /* Additional flags for 8051 address spaces */
 188 #define A_DATA  0000                    /* data space (default)*/
 189 #define A_CODE  0040                    /* code space */
 190 #define A_XDATA 0100                    /* external data space */
 191 #define A_BIT   0200                    /* bit addressable space */
 192
 193 #define A_NOLOAD  0400                  /* nonloadable */
 194 #define A_LOAD  0000                    /* loadable (default) */
 195
 196 /*
 197  *      The "R_" relocation constants define values used in
 198  *      generating the assembler relocation output data for
 199  *      areas, symbols, and code.
 200  *
 201  * Relocation flags
 202  *
 203  *         7     6     5     4     3     2     1     0
 204  *      +-----+-----+-----+-----+-----+-----+-----+-----+
 205  *      | MSB | PAGn| PAG0| USGN| BYT2| PCR | SYM | BYT |
 206  *      +-----+-----+-----+-----+-----+-----+-----+-----+
 207  */
 208
 209 #define R_WORD  0x00                    /* 16 bit */
 210 #define R_BYTE  0x01                    /*  8 bit */
 211
 212 #define R_AREA  0x00                    /* Base type */
 213 #define R_SYM   0x02
 214
 215 #define R_NORM  0x00                    /* PC adjust */
 216 #define R_PCR   0x04
 217
 218 #define R_BYT1  0x00                    /* Byte count for R_BYTE = 1 */
 219 #define R_BYT2  0x08                    /* Byte count for R_BYTE = 2 */
 220
 221 #define R_SGND  0x00                    /* Signed Byte */
 222 #define R_USGN  0x10                    /* Unsigned Byte */
 223
 224 #define R_NOPAG 0x00                    /* Page Mode */
 225 #define R_PAG0  0x20                    /* Page '0' */
 226 #define R_PAG   0x40                    /* Page 'nnn' */
 227
 228 #define R_LSB   0x00                    /* low byte */
 229 #define R_MSB   0x80                    /* high byte */
 230
 231 #define R_BYT3  0x100                   /* if R_BYTE is set, this is a
 232                                          * 3 byte address, of which
 233                                          * the linker must select one byte.
 234                                          */
 235 #define R_HIB   0x200                   /* If R_BYTE & R_BYT3 are set, linker
 236                                          * will select byte 3 of the relocated
 237                                          * 24 bit address.
 238                                          */
 239
 240 #define R_J11   (R_WORD|R_BYT2)         /* JLH: 11 bit JMP and CALL (8051) */
 241 #define R_J19   (R_WORD|R_BYT2|R_MSB)   /* 19 bit JMP/CALL (DS80C390)      */
 242 #define R_C24   (R_WORD|R_BYT1|R_MSB)   /* 24 bit address (DS80C390)       */
 243 #define R_J19_MASK (R_BYTE|R_BYT2|R_MSB)
 244
 245 #define IS_R_J19(x) (((x) & R_J19_MASK) == R_J19)
 246 #define IS_R_J11(x) (((x) & R_J19_MASK) == R_J11)
 247 #define IS_C24(x) (((x) & R_J19_MASK) == R_C24)
 248
 249 #define R_ESCAPE_MASK   0xf0            /* Used to escape relocation modes
 250                                          * greater than 0xff in the .rel
 251                                          * file.
 252                                          */
 253
 254 /*
 255  * Listing Control Flags
 256  */
 257
 258 #define R_HIGH  0040000                 /* High Byte */
 259 #define R_RELOC 0100000                 /* Relocation */
 260
 261 #define R_DEF   00                      /* Global def. */
 262 #define R_REF   01                      /* Global ref. */
 263 #define R_REL   00                      /* Relocatable */
 264 #define R_ABS   02                      /* Absolute */
 265 #define R_GBL   00                      /* Global */
 266 #define R_LCL   04                      /* Local */
 267
 268 /*
 269  *      The mne structure is a linked list of the assembler
 270  *      mnemonics and directives.  The list of mnemonics and
 271  *      directives contained in the device dependent file
 272  *      xxxpst.c are hashed and linked into NHASH lists in
 273  *      module assym.c by syminit().  The structure contains
 274  *      the mnemonic/directive name, a subtype which directs
 275  *      the evaluation of this mnemonic/directive, a flag which
 276  *      is used to detect the end of the mnemonic/directive
 277  *      list in xxxpst.c, and a value which is normally
 278  *      associated with the assembler mnemonic base instruction
 279  *      value.
 280  */
 281 struct  mne
 282 {
 283         struct  mne *m_mp;              /* Hash link */
 284         char    *m_id;                  /* Mnemonic JLH: change from [NCPS] */
 285         char    m_type;                 /* Mnemonic subtype */
 286         char    m_flag;                 /* Mnemonic flags */
 287         Addr_T  m_valu;                 /* Value */
 288 };
 289
 290 /*
 291  *      The sym structure is a linked list of symbols defined
 292  *      in the assembler source files.  The first symbol is "."
 293  *      defined in asdata.c.  The entry 'struct tsym *s_tsym'
 294  *      links any temporary symbols following this symbol and
 295  *      preceeding the next normal symbol.  The structure also
 296  *      contains the symbol's name, type (USER or NEW), flag
 297  *      (global, assigned, and multiply defined), a pointer
 298  *      to the area structure defining where the symbol is
 299  *      located, a reference number assigned by outgsd() in
 300  *      asout.c, and the symbols address relative to the base
 301  *      address of the area where the symbol is located.
 302  */
 303 struct  sym
 304 {
 305         struct  sym  *s_sp;             /* Hash link */
 306         struct  tsym *s_tsym;           /* Temporary symbol link */
 307         char    *s_id;                  /* Symbol: JLH change from [NCPS] */
 308         char    s_type;                 /* Symbol subtype */
 309         char    s_flag;                 /* Symbol flags */
 310         struct  area *s_area;           /* Area line, 0 if absolute */
 311         int     s_ref;                  /* Ref. number */
 312         Addr_T  s_addr;                 /* Address */
 313         Addr_T  s_org;                  /* Start Address if absolute */
 314 };
 315
 316 #define S_GBL           01              /* Global */
 317 #define S_ASG           02              /* Assigned */
 318 #define S_MDF           04              /* Mult. def */
 319 #define S_END           010             /* End mark for pst. */
 320
 321 #define S_NEW           0               /* New name */
 322 #define S_USER          1               /* User name */
 323                                         /* unused slot */
 324                                         /* unused slot */
 325                                         /* unused slot */
 326
 327 #define S_BYTE          5               /* .byte */
 328 #define S_WORD          6               /* .word */
 329 #define S_ASCII         7               /* .ascii */
 330 #define S_ASCIZ         8               /* .asciz */
 331 #define S_BLK           9               /* .blkb or .blkw */
 332 #define S_INCL          10              /* .include */
 333 #define S_DAREA         11              /* .area */
 334 #define S_ATYP          12              /* .area type */
 335 #define S_AREA          13              /* .area name */
 336 #define S_GLOBL         14              /* .globl */
 337 #define S_PAGE          15              /* .page */
 338 #define S_TITLE         16              /* .title */
 339 #define S_SBTL          17              /* .sbttl */
 340 #define S_IF            18              /* .if */
 341 #define S_ELSE          19              /* .else */
 342 #define S_ENDIF         20              /* .endif */
 343 #define S_EVEN          21              /* .even */
 344 #define S_ODD           22              /* .odd */
 345 #define S_RADIX         23              /* .radix */
 346 #define S_ORG           24              /* .org */
 347 #define S_MODUL         25              /* .module */
 348 #define S_ASCIS         26              /* .ascis */
 349 #define S_FLAT24        27              /* .flat24 */
 350 #define S_OPTSDCC       28              /* .optsdcc */
 351 #define S_ULEB128       29              /* .uleb128 */
 352 #define S_SLEB128       30              /* .sleb128 */
 353
 354 /*
 355  *      The tsym structure is a linked list of temporary
 356  *      symbols defined in the assembler source files following
 357  *      a normal symbol.  The structure contains the temporary
 358  *      symbols number, a flag (multiply defined), a pointer to the
 359  *      area structure defining where the temporary structure
 360  *      is located, and the temporary symbol's address relative
 361  *      to the base address of the area where the symbol
 362  *      is located.
 363  */
 364 struct  tsym
 365 {
 366         struct  tsym *t_lnk;            /* Link to next */
 367 /* sandeep changed to 'int' from 'char' */
 368 /* this will increase the number temp symbols
 369    that can be defined from 255 to INT_MAX */
 370         int t_num;                      /* 0-INT_MAX$ */
 371         int t_flg;                      /* flags */
 372
 373         struct  area *t_area;           /* Area */
 374         Addr_T  t_addr;                 /* Address */
 375 };
 376
 377 /*
 378  *      External Definitions for all Global Variables
 379  */
 380
 381 extern  int     aserr;                  /*      ASxxxx error counter
 382                                          */
 383 extern  jmp_buf jump_env;               /*      compiler dependent structure
 384                                          *      used by setjmp() and longjmp()
 385                                          */
 386 extern  int     inpfil;                 /*      count of assembler
 387                                          *      input files specified
 388                                          */
 389 extern  int     incfil;                 /*      current file handle index
 390                                          *      for include files
 391                                          */
 392 extern  int     cfile;                  /*      current file handle index
 393                                          *      of input assembly files
 394                                          */
 395 extern  int     flevel;                 /*      IF-ELSE-ENDIF flag will be non
 396                                          *      zero for false conditional case
 397                                          */
 398 extern  int     tlevel;                 /*      current conditional level
 399                                          */
 400 extern  int     ifcnd[MAXIF+1];         /*      array of IF statement condition
 401                                          *      values (0 = FALSE) indexed by tlevel
 402                                          */
 403 extern  int     iflvl[MAXIF+1];         /*      array of IF-ELSE-ENDIF flevel
 404                                          *      values indexed by tlevel
 405                                          */
 406 extern  char
 407         afn[PATH_MAX];                  /*      afile() temporary filespec
 408                                          */
 409 extern  char
 410         srcfn[MAXFIL][PATH_MAX];        /*      array of source file names
 411                                          */
 412 extern  int
 413         srcline[MAXFIL];                /*      current source file line
 414                                          */
 415 extern  char
 416         incfn[MAXINC][PATH_MAX];        /*      array of include file names
 417                                          */
 418 extern  int
 419         incline[MAXINC];                /*      current include file line
 420                                          */
 421 extern  int     radix;                  /*      current number conversion radix:
 422                                          *      2 (binary), 8 (octal), 10 (decimal),
 423                                          *      16 (hexadecimal)
 424                                          */
 425 extern  int     line;                   /*      current assembler source
 426                                          *      line number
 427                                          */
 428 extern  int     page;                   /*      current page number
 429                                          */
 430 extern  int     lop;                    /*      current line number on page
 431                                          */
 432 extern  int     pass;                   /*      assembler pass number
 433                                          */
 434 extern  int     org_cnt;                /*      .org directive counter
 435                                          */
 436 extern  int     lflag;                  /*      -l, generate listing flag
 437                                          */
 438 extern  int     cflag;                  /*      -c, generate sdcdb debug information
 439                                          */
 440 extern  int     gflag;                  /*      -g, make undefined symbols global flag
 441                                          */
 442 extern  int     aflag;                  /*      -a, make all symbols global flag
 443                                          */
 444 extern  int     jflag;                  /*      -j, generate debug information flag
 445                                          */
 446 extern  int     oflag;                  /*      -o, generate relocatable output flag
 447                                          */
 448 extern  int     sflag;                  /*      -s, generate symbol table flag
 449                                          */
 450 extern  int     pflag;                  /*      -p, enable listing pagination
 451                                          */
 452 extern  int     xflag;                  /*      -x, listing radix flag
 453                                          */
 454 extern  int     fflag;                  /*      -f(f), relocations flagged flag
 455                                          */
 456 extern  Addr_T  laddr;                  /*      address of current assembler line
 457                                          *      or value of .if argument
 458                                          */
 459 extern  Addr_T  fuzz;                   /*      tracks pass to pass changes in the
 460                                          *      address of symbols caused by
 461                                          *      variable length instruction formats
 462                                          */
 463 extern  int     lmode;                  /*      listing mode
 464                                          */
 465 extern  struct  area    area[];         /*      array of 1 area
 466                                          */
 467 extern  struct  area *areap;            /*      pointer to an area structure
 468                                          */
 469 extern  struct  sym     sym[];          /*      array of 1 symbol
 470                                          */
 471 extern  struct  sym *symp;              /*      pointer to a symbol structure
 472                                          */
 473 extern  struct  sym *symhash[NHASH];    /*      array of pointers to NHASH
 474                                          *      linked symbol lists
 475                                          */
 476 extern  struct  mne *mnehash[NHASH];    /*      array of pointers to NHASH
 477                                          *      linked mnemonic/directive lists
 478                                          */
 479 extern  char    *ep;                    /*      pointer into error list
 480                                          *      array eb[NERR]
 481                                          */
 482 extern  char    eb[NERR];               /*      array of generated error codes
 483                                          */
 484 extern  const char *ip;                 /*      pointer into the assembler-source
 485                                          *      text line in ib[]
 486                                          */
 487 extern  const char *ib;                 /*      assembler-source text line
 488                                          */
 489 extern  char    *cp;                    /*      pointer to assembler output
 490                                          *      array cb[]
 491                                          */
 492 extern  char    cb[NCODE];              /*      array of assembler output values
 493                                          */
 494 extern  int     *cpt;                   /*      pointer to assembler relocation type
 495                                          *      output array cbt[]
 496                                          */
 497 extern  int     cbt[NCODE];             /*      array of assembler relocation types
 498                                          *      describing the data in cb[]
 499                                          */
 500 extern  char    tb[NTITL];              /*      Title string buffer
 501                                          */
 502 extern  char    stb[NSBTL];             /*      Subtitle string buffer
 503                                          */
 504 extern  char    optsdcc[NINPUT];        /*      sdcc compile options
 505                                          */
 506 extern  int     flat24Mode;             /*      non-zero if we are using DS390 24 bit
 507                                          *      flat mode (via .flat24 directive).
 508                                          */
 509 extern  char    symtbl[];               /*      string "Symbol Table"
 510                                          */
 511 extern  char    aretbl[];               /*      string "Area Table"
 512                                          */
 513 extern  char    module[NCPS];           /*      module name string
 514                                          */
 515 extern  FILE    *lfp;                   /*      list output file handle
 516                                          */
 517 extern  FILE    *ofp;                   /*      relocation output file handle
 518                                          */
 519 extern  FILE    *tfp;                   /*      symbol table output file handle
 520                                          */
 521 extern  FILE    *sfp[MAXFIL];           /*      array of assembler-source file handles
 522                                          */
 523 extern  FILE    *ifp[MAXINC];           /*      array of include-file file handles
 524                                          */
 525 extern  unsigned char   ctype[128];     /*      array of character types, one per
 526                                          *      ASCII character
 527                                          */
 528
 529 extern  char    ccase[128];             /* an array of characters which
 530                                          * perform the case translation function
 531                                          */
 532 /*
 533  * Definitions for Character Types
 534  */
 535 #define SPACE   0000
 536 #define ETC     0000
 537 #define LETTER  0001
 538 #define DIGIT   0002
 539 #define BINOP   0004
 540 #define RAD2    0010
 541 #define RAD8    0020
 542 #define RAD10   0040
 543 #define RAD16   0100
 544 #define ILL     0200
 545
 546 #define DGT2    DIGIT|RAD16|RAD10|RAD8|RAD2
 547 #define DGT8    DIGIT|RAD16|RAD10|RAD8
 548 #define DGT10   DIGIT|RAD16|RAD10
 549 #define LTR16   LETTER|RAD16
 550
 551 /*
 552  *      The exp structure is used to return the evaluation
 553  *      of an expression.  The structure supports three valid
 554  *      cases:
 555  *      (1)     The expression evaluates to a constant,
 556  *              mode = S_USER, flag = 0, addr contains the
 557  *              constant, and base = NULL.
 558  *      (2)     The expression evaluates to a defined symbol
 559  *              plus or minus a constant, mode = S_USER,
 560  *              flag = 0, addr contains the constant, and
 561  *              base = pointer to area symbol.
 562  *      (3)     The expression evaluates to a external
 563  *              global symbol plus or minus a constant,
 564  *              mode = S_NEW, flag = 1, addr contains the
 565  *              constant, and base = pointer to symbol.
 566  */
 567 struct  expr
 568 {
 569         char    e_mode;                 /* Address mode */
 570         char    e_flag;                 /* Symbol flag */
 571         Addr_T  e_addr;                 /* Address */
 572         union   {
 573                 struct area *e_ap;
 574                 struct sym  *e_sp;
 575         } e_base;                       /* Rel. base */
 576         int     e_rlcf;                 /* Rel. flags */
 577 };
 578
 579 /* C Library functions */
 580 /* for reference only
 581 extern  VOID            exit();
 582 extern  int             fclose();
 583 extern  char *          fgets();
 584 extern  FILE *          fopen();
 585 extern  int             fprintf();
 586 extern  VOID            longjmp();
 587 extern  VOID *          malloc();
 588 extern  int             printf();
 589 extern  char            putc();
 590 extern  int             rewind();
 591 extern  int             setjmp();
 592 extern  int             strcmp();
 593 extern  char *          strcpy();
 594 extern  int             strlen();
 595 extern  char *          strncpy();
 596 */
 597
 598 /* Machine independent functions */
 599
 600 /* asmain.c */
 601 extern  FILE *          afile();
 602 extern  VOID            asexit();
 603 extern  VOID            asmbl();
 604 extern  int             main();
 605 extern  VOID            newdot();
 606 extern  VOID            phase();
 607 extern  VOID            usage();
 608
 609 /* aslex.c */
 610 extern  char            endline();
 611 extern  char            get();
 612 extern  VOID            getid();
 613 extern  int             as_getline();
 614 extern  int             getmap();
 615 extern  char            getnb();
 616 extern  VOID            getst();
 617 extern  int             more();
 618 extern  VOID            unget();
 619 extern  VOID            chop_crlf();
 620
 621 /* assym.c */
 622 extern  struct  area *  alookup();
 623 extern  struct  mne *   mlookup();
 624 extern  int             hash();
 625 extern  struct  sym *   lookup();
 626 extern  VOID *          new();
 627 extern  char *          strsto(char *str);
 628 extern  int             symeq();
 629 extern  VOID            syminit();
 630 extern  VOID            symglob();
 631 extern  VOID            allglob();
 632
 633 /* assubr.c */
 634 extern  VOID            aerr();
 635 extern  VOID            diag();
 636 extern  VOID            err();
 637 extern  VOID            warnBanner(void);
 638 extern  char *          geterr();
 639 extern  VOID            qerr();
 640 extern  VOID            rerr();
 641
 642 /* asexpr.c */
 643 extern  VOID            abscheck();
 644 extern  Addr_T          absexpr();
 645 extern  VOID            clrexpr();
 646 extern  int             digit();
 647 extern  int             is_abs();
 648 extern  VOID            expr();
 649 extern  int             oprio();
 650 extern  VOID            term();
 651
 652 /* aslist.c */
 653 extern  VOID            list();
 654 extern  VOID            list1();
 655 extern  VOID            list2();
 656 extern  VOID            lstsym();
 657 extern  VOID            slew();
 658
 659 /* asout.c */
 660 extern  int             hibyte();
 661 extern  int             lobyte();
 662 extern  int             byte3(int);
 663 extern  VOID            out();
 664 extern  VOID            outab();
 665 extern  VOID            outarea();
 666 extern  VOID            outaw();
 667 extern  VOID            outall();
 668 extern  VOID            outdot();
 669 extern  VOID            outbuf();
 670 extern  VOID            outchk();
 671 extern  VOID            outgsd();
 672 extern  VOID            outrb();
 673 extern  VOID            outrw(struct expr *, int);
 674 extern  VOID            outr24(struct expr *, int);
 675 extern  VOID            outsym();
 676 extern  VOID            out_lb();
 677 extern  VOID            out_lw();
 678 extern  VOID            out_l24(int, int);
 679 extern  VOID            out_rw();
 680 extern  VOID            out_tw();
 681 extern  VOID            out_t24(int);
 682 extern  VOID            outr11();       /* JLH */
 683 extern  VOID            outr19(struct expr *, int, int);
 684 extern  VOID            outdp(struct area *, struct expr *);
 685
 686 /* asnoice.c */
 687 extern void DefineNoICE_Line();
 688 extern void DefineCDB_Line();
 689
 690 /* Machine dependent variables */
 691
 692 extern  char *          cpu;
 693 extern  char *          dsft;
 694 extern  int             hilo;
 695 extern  struct  mne     mne[];
 696
 697 /* Machine dependent functions */
 698
 699 extern  VOID            minit();
 700 extern  VOID            machine(struct mne *);
 701
 702 /* strcmpi.c */
 703 extern  int as_strcmpi(const char *s1, const char *s2);
 704 extern  int as_strncmpi(const char *s1, const char *s2, size_t n);