'HEAD'  DATA DEFINITIONS FOR LINKER
C     EDIT DATE   16JAN79  15:17
C     SOURCE FILE DATADFGAK.FS
C     AUTHOR      GARY A. KUDIS
C     CLUSTER     0
C     0.00 /BITDFN/ BIT DEFINITIONS
C     0.01 /CHARAC/ CHARACTER DEFINITIONS
C     0.02 /DARRAY/ DICTIONARY ARRAY
C     0.03 /ERRDFN/ ERROR DEFINITIONS
C     0.04 /IODEFN/ IO CHANNEL DEFINITIONS
C     0.05 /LDATAX/ LINKER DATA
C     0.06 /MEMORY/ MEMORY USE MAP
C     0.07 /NTABLE/ NAME LIST TABLE
C     0.08 /PNAMES/ PRINT NAME LIST DATA STRUCTURES
C     0.09 /QUESTS/ QUESTIONS TO USER
C     0.10 /RECORD/ INPUT RECORD DEFINITIONS
C     0.11 /STACKS/ LINKER STACK AREAS
      'OUTFILE' BITDFNGAK.FR
      BLOCK DATA
      'INCLUDE' BITDFNGAK.IN,P
      DATA        BIT00 /1/
      DATA        BIT01 /2/
      DATA        BIT02 /4/
      DATA        BIT03 /8/
      DATA        BIT04 /16/
      DATA        BIT05 /32/
      DATA        BIT06 /64/
      DATA        BIT07 /128/
      DATA        BIT08 /256/
      DATA        BIT09 /512/
      DATA        BIT10 /1024/
      DATA        BIT11 /2048/
      DATA        BIT12 /4096/
      DATA        BIT13 /8192/
      DATA        BIT14 /16384/
      END
      'OUTFILE' CHARACGAK.FR
      BLOCK DATA
      'INCLUDE' CHARACGAK.IN,P
      DATA     CHMASK /127/
      DATA     CR, LF /13, 10/
      DATA     CRLF   /3338/
      DATA     BLANK  /32/,  PERIOD  /46/
      DATA     BLANKS,DASHES,COLONS,SLASHS /8224,11565,14906,12079/
      DATA     ACH, BCH, CCH, DCH, ECH, FCH /65,66,67,68,69,70/
      DATA     GCH, HCH, ICH, JCH, KCH, LCH /71,72,73,74,75,76/
      DATA     MCH, NCH, OCH, PCH, QCH, RCH /77,78,79,80,81,82/
      DATA     SCH, TCH, UCH, VCH, WCH, XCH /83,84,85,86,87,88/
      DATA     YCH, ZCH                     /89,90/
      DATA     LBRACE, RBRACE /91, 93/
      DATA     LBRACK, RBRACK /40, 41/
      END
      'OUTFILE' DARRAYGAK.FR
      BLOCK DATA
      'INCLUDE' DARRAYGAK.IN,P
      DATA     DTSTOP   /400/
      END
      'OUTFILE' ERRDFNGAK.FR
      BLOCK DATA
      'INCLUDE' ERRDFNGAK.IN,P
      'EJECT'
      DATA     EMAX     /17/
      DATA     EPROC(1)/1/,  ECOUNT(1)/0/,  ELIMIT(1)/0/
      DATA     EMSG1  /'INVALID ERROR CODE  '/
      DATA     EPROC(2)/2/,  ECOUNT(2)/0/,  ELIMIT(2)/0/
      DATA     EMSG2   /'ERROR COUNT EXCEEDED'/
      DATA     EPROC(3)/3/,  ECOUNT(3)/0/,  ELIMIT(3)/2/
      DATA     EMSG3   /'IO ERROR, FORT CODE '/
      DATA     EPROC(4)/4/,  ECOUNT(4)/0/,  ELIMIT(4)/1/
      DATA     EMSG4   /'INVALID RB RECORD   '/
      DATA     EPROC(5)/5/,  ECOUNT(5)/0/,  ELIMIT(5)/10/
      DATA     EMSG5   /'NAME LIST OVERFLOW :'/
      DATA     EPROC(6)/6/,  ECOUNT(6)/0/,  ELIMIT(6)/10/
      DATA     EMSG6   /'NAME TEXT OVERFLOW :'/
      DATA     EPROC(7)/7/,  ECOUNT(7)/0/,  ELIMIT(7)/2/
      DATA     EMSG7   /'FAILURE IN RB FILE  '/
      DATA     EPROC(8)/8/,  ECOUNT(8)/0/,  ELIMIT(8)/0/
      DATA     EMSG8   /'LINKER SOFTWARE ERR '/
      DATA     EPROC(9)/9/,  ECOUNT(9)/0/,  ELIMIT(9)/3/
      DATA     EMSG9   /'CHECKSUM IN RB FILE '/
      DATA     EPROC(10)/10/, ECOUNT(10)/0/, ELIMIT(10)/0/
      DATA     EMSG10  /'MISSING DICT ID     '/
      DATA     EPROC(11)/11/, ECOUNT(11)/0/, ELIMIT(11)/100/
      DATA     EMSG11   /'OVERWRITE ERROR AT  '/
      DATA     EPROC(12)/12/, ECOUNT(12)/0/, ELIMIT(12)/0/
      DATA     EMSG12   /'DICTIONARY OVERFLOW '/
      DATA     EPROC(13)/13/, ECOUNT(13)/0/, ELIMIT(13)/0/
      DATA     EMSG13   /'MULTIPLE DICT ID    '/
      DATA     EPROC(14)/14/, ECOUNT(14)/0/, ELIMIT(14)/20/
      DATA     EMSG14   /'RB FILE NAME ERROR  '/
      DATA     EPROC(15)/15/, ECOUNT(15)/0/, ELIMIT(15)/50/
      DATA     EMSG15   /'MULTIPLE START ADDR '/
      DATA     EPROC(16)/16/, ECOUNT(16)/0/, ELIMIT(16)/50/
      DATA     EMSG16   /'COMMON SIZE ERROR   '/
      DATA     EPROC(17)/17/, ECOUNT(16)/0/, ELIMIT(17)/32767/
      DATA     EMSG17   /'RAM INITIALIZATION  '/
      END
      'OUTFILE' IODEFNGAK.FR
      BLOCK DATA
      'INCLUDE' IODEFNGAK.IN,P
      DATA     CMCHAN      /1/
      DATA     RBCHAN      /2/
      DATA     OBCHAN      /3/
      DATA     MPCHAN      /4/
I     DATA      TTYIN      /5/
I     DATA      TTYOUT     /6/
P     DATA     TTYIN       /5/
N     DATA     TTYIN       /11/
P     DATA     TTYOUT      /5/
N     DATA     TTYOUT      /10/
N     DATA     OVCHAN      /0/
      DATA     DBCHAN      /7/
      END
      'OUTFILE'   IOFILEGAK.FR
      BLOCK DATA
      'INCLUDE'   IOFILEGAK.IN,P
N     DATA     OVFILE      /'LINKER.OL'/
N     DATA     TIFILE      /'$TTI', 0/
N     DATA     TOFILE      /'$TTO', 0/
P     DATA     TIFILE      /'TI: ', 0/
      DATA     DBFILE      /'DEBUGLS   ', 11*0/
      END
      'OUTFILE' LDATAXGAK.FR
      BLOCK DATA
      'INCLUDE' LDATAXGAK.IN,P
      DATA        MPFLAG   /.FALSE./
      DATA        OVMODE   /.FALSE./
      DATA        LBMODE   /.FALSE./
      DATA        LOADRB   /.FALSE./
      DATA        SFLAG    /.FALSE./
      DATA        VERS     /2/
      DATA        ZLOC, ZSTR, ZMAX, ZLIMIT /0,0,0,255/
      DATA        CLOC, CSTR, CMAX, CLIMIT /512,512,512,-1/
      DATA        NLOC, NSTR, NMAX, NLIMIT /512,512,512,-1/
      DATA        DLOC, DSTR, DMAX, DLIMIT /512,512,512,-1/
      END
      'OUTFILE' MEMORYGAK.FR
      BLOCK DATA
      'INCLUDE' MEMORYGAK.IN,P
      DATA     MEMORY /4096*0/
      DATA     ROM    /64*0/
      END
      'OUTFILE' NTABLEGAK.FR
      BLOCK DATA
      'INCLUDE' NTABLEGAK.IN,P
      DATA     NTITLE      /0/
      DATA     NFLAGS      /512*0/
      DATA     NADDRS      /512*0/
      DATA     NPOSIT      /512*0/
      DATA     NDATA       /512*0/
      DATA     NTEXTX      /512*0/
      DATA     NTEXT       /1000*0/
      DATA     NLSTRT/1/,  NLSTOP/512/
      DATA     TXSTRT/1/,  TXSTOP/1000/
      DATA     NTXBTS/15/
      DATA     USEBIT/16/
      DATA     COMBIT/32/
      DATA     OVLBIT/64/
      DATA     EPTBIT/128/
      DATA     LDMBIT/256/
      DATA     MODBIT/512/
      DATA     MLTBIT/1024/
      DATA     RLSBIT/2048/
      DATA     GDFBIT/4096/
C     DATA     TYPBTS/BIT15+BIT14+BIT13/
      END
      'OUTFILE' PNAMESGAK.FR
      BLOCK DATA
      'INCLUDE' PNAMESGAK.IN,P
      DATA        LSTOP    /512/
      END
      'OUTFILE' QUESTSGAK.FR
      BLOCK DATA
      'INCLUDE' QUESTSGAK.IN,P
      DATA     CMQUES /'INPUT COMMAND FILE? '/
      DATA     OBQUES /'OUTPUT OBJECT FILE? '/
      DATA     MPQUES /'OUTPUT XR-MAP FILE? '/
      END
      'OUTFILE' RECORDGAK.FR
      BLOCK DATA
      'INCLUDE' RECORDGAK.IN,P
      DATA     RTMAX    /20/
      DATA     RSZMAX   /41/
      DATA     RSIZES(1)   /9/
      DATA     RSIZES(2)   /1/
      DATA     RSIZES(3)   /2/
      DATA     RSIZES(4)   /41/
      DATA     RSIZES(5)   /11/
      DATA     RSIZES(6)   /11/
      DATA     RSIZES(7)   /12/
      DATA     RSIZES(8)   /12/
      DATA     RSIZES(9)   /10/
      DATA     RSIZES(10)  /0/
      DATA     RSIZES(11)  /3/
      DATA     RSIZES(12)  /4/
      DATA     RSIZES(13)  /4/
      DATA     RSIZES(14)  /3/
      DATA     RSIZES(15)  /2/
      DATA     RSIZES(16)  /2/
      DATA     RSIZES(17)  /3/
      DATA     RSIZES(18)  /11/
      DATA     RSIZES(19)  /1/
      DATA     RSIZES(20)  /1/
      END
      'OUTFILE' STACKSGAK.FR
      BLOCK DATA
      'INCLUDE' STACKSGAK.IN,P
      DATA     MX /1/
      DATA     MSTKSZ /30/
      END
      'OUTFILE'   TXTCOMGAK.FR
      BLOCK DATA
      'INCLUDE'   TXTCOMGAK.IN,P
      DATA  TEXT  ^
         /'    NOUN = XXXX, DATA = XXXX, ZREL = XXXX, CODE = XXXX'/
      DATA  LEFT  / 12, 25, 38, 51/
      DATA  RIGHT / 15, 28, 41, 54/
      END