*COMDECK XSTD 
          #   LIST OF THE EXTERNALS TO COMMUNICATE WITH THE 
          SYNTAX TABLE DRIVER # 
      STATUS QCHAR DELM,       #   0   #
                   PERIOD,     #   1   #
                   LEFTPRN,    #   2   #
                   RIGHTPRN,   #   3   #
                   PLUS,       #   4   #
                   MINUS,      #   5   #
                   ASK,        #   6   #
                   SLASH,      #   7   #
                   E,          #   8   #
                   M,          #   9   #
                   O,          #  10   #
                   I,          #  11   #
                   MSK,        #  12   #
                   LETTER,     #  13   #
                   OCTDIGIT,   #  14   #
                   DIGIT,      #  15   #
                   SPC,        #  16   #
                   TRCE,       #  17   #
                   SEP,        #  18   #
                   EQU;        #  19   #
      XREF BEGIN
      BASED ARRAY KEYWSA[0] S(1);      # ARRAY FOR 10 CHARACTER KEY SO # FEAT157
        BEGIN                          # -KEYAREA- CAN PRECEDE QUIWSA  # FEAT157
        ITEM KEYAREA  C(0,0,10);   # KEY FOR THE CATALOG FILES         # FEAT157
        END                                                              FEAT157
      BASED ARRAY QUIWSA[0] S(1);      # ARRAY IN HIGH CORE FOR ALL    # FEAT157
        BEGIN                          # TRANSMISSIONS. SET IN -INITIAL# FEAT157
        ITEM INWORD  C(0,0,10);    # CHAR ITEM FOR READING INPUT       # FEAT157
        ITEM QUIFIRST C(0,0,4);    # FIRST FOUR CHARACTERS             #
        END                                                              FEAT157
       ITEM VERSTL I;              # TL ASSOCIATED WITH PRIMARY CATALOG#
       ITEM MAXTL I;               # MAX TL THAT FITS IN QUIWSA BUFFER #
            ITEM QUIRL; 
            ARRAY  CURWORD [0:25] S(1);   # HOLDS CURRENT LEX TOKEN    #005100
              BEGIN                                                     005200
              ITEM  ICW     C(00,00,10);  # 10-CHAR ITEM               #005300
              ITEM  ICWC    C(00,00,240); # MAX-SIZE CHAR ITEM         #005400
              ITEM  ICWI    I(00,00,60);  # INTEGER ITEM               #005500
              ITEM  ICWR    R(00,00,60);  # REAL ITEM                  #005600
              END                                                       005700
            ARRAY  NEXWORD [0:25] S(1);   # HOLDS NEXT LEXICAL TOKEN   #005800
              BEGIN                                                     005900
              ITEM  INW     C(00,00,10);  # 10-CHAR ITEM               #006000
              ITEM  INWC    C(00,00,240); # MAX-SIZE CHAR ITEM         #006100
              ITEM  INWI    I(00,00,60);  # INTEGER ITEM               #006200
              ITEM  INWR    R(00,00,60);  # REAL ITEM                  #006300
              END                                                       006400
             ARRAY  CURP1;  BEGIN  ITEM  CP1A  U(0,54,6); 
                                   ITEM CP1B  U(0,51,3);
      ITEM CP1REC  B(0,48,1); 
                                   ITEM  CP1C  U(0,45,3); 
                                   ITEM  CP1F  U(0,45,15);
                                   ITEM  CP1   U(0,00,60);
                            END 
            ARRAY CURP2;                                                 XEQREP 
              BEGIN                                                      XEQREP 
              ITEM CP2A         U(00,51,09);   # MIN LG OF KEYWD (BITS)# XEQREP 
              ITEM CP2B         U(00,45,06);   # SECONDARY OVL LEVEL   # XEQREP 
              ITEM CP2F         U(00,45,15);   # FULL 15 BIT FIELD DEF # XEQREP 
              ITEM CP2          U(00,00,60);   # FULL WORD DEF         # XEQREP 
              END                                                        XEQREP 
             ARRAY  NEXP1;  BEGIN  ITEM  NP1A  U(0,54,6); 
                                   ITEM NP1B  U(0,51,3);
      ITEM  NP1REC  B(0,48,1);  #IF ON,OR T, DONT RECORD# 
                                   ITEM  NP1C  U(0,45,3); 
                                   ITEM  NP1; 
                            END 
            ARRAY NEXP2;                                                 XEQREP 
              BEGIN                                                      XEQREP 
              ITEM NP2A         U(00,51,09);   # MIN LG OF KEYWD (BITS)# XEQREP 
              ITEM NP2B         U(00,45,06);   # SECONDARY OVL LEVEL   # XEQREP 
              ITEM NP2          U(00,00,60);   # FULL WORD DEF         # XEQREP 
              END                                                        XEQREP 
             ITEM CURLENG, NEXLENG;  #NUMBER OF CHARACTERS IN CURWORD 
                                      AND NEXWORD RESPECTIVELY# 
             ITEM CURLENW, NEXLENW;  #LENGTH IN WORDS OF CURRENT AND
                                              NEXT WORD                #
             ITEM NEXSYNSECT,SYNSECT;  # SYNTBLE ADDRESSES FOR NEXWORD #
                                       # AND CURWORD IF KEYWORDS.      #
             ITEM CURTYPE, NEXTYPE;  #SYNTACTICAL TYPE OF CURWORD AND 
                                      NEXWORD RESPECTIVELY# 
             ARRAY CURLXID[0];  ITEM CLXDIRV B(0,50,1), 
                                     CLXREPT B(0,49,1), 
                                     CLXRESV B(0,48,1), 
                                     CLXARIT B(0,47,1), 
                                     CLXBOOL B(0,46,1), 
                                     CLXFUNC B(0,45,1), 
                                     CLXNUM  U(0,51,9), 
                                     CLXWRD  U(0,45,15),
                                     CLX     I(0,00,60);
             ARRAY NEXLXID[0];  ITEM NLXDIRV B(0,50,1), 
                                     NLXREPT B(0,49,1), 
                                     NLXRESV B(0,48,1), 
                                     NLXARIT B(0,47,1), 
                                     NLXBOOL B(0,46,1), 
                                     NLXFUNC B(0,45,1), 
                                     NLXNUM  U(0,51,9), 
                                     NLXWRD  U(0,45,15),
                                     NLX     I(0,00,60);
             ITEM PLEXWORDS;           # ADDRESSES OF THE TABLES CON-  #
             ITEM PLEXICON;            # TAINING KEYWORD INFO.         #
             ITEM PLBLPTRS,PSYNTBLE,   # PTRS TO LBLPTRS AND SYNTBLE   #
                  PSWVECTR;            # TABLES AND FWA OF SWITCH VECTR#
             ITEM BP,WP;               # BIT AND WORD PTRS TO LAST CHAR#
                                       # ACCESSED IN QUIWSA.           #
             ITEM RECDSIZE;            # TOTAL CHARS IN CHARLIST STACK.#
             ITEM LEXPTR;              # NEXT CHAR IN CHAR-.ST2S0ABKH  #
             ITEM KEYTEST B;
      ARRAY SLIST [99];                  # CONTAINS THE STATUS VALUE OF#00000042
        ITEM STATUSLIST S:QCHAR(0,0,60); # CORRESPONDING ENTRY IN      #00000043
                                         # CHARLIST.                   #00000044
      ARRAY CHARLIST [99];               # CONTAINS QUS SYNTAX INPUT   #00000045
        ITEM LEXCHAR C(0,0,10);          # 1 CHAR PER WORD.            #00000046
*IF DEF,DEBUG 
      #****************************************************************#
      #        CARDS BETWEEN **** CARDS SHOULD BE PULLED FOR RELEASE.  #
             ITEM PTRACEM;             # PTR TO TRACEM TABLE.          #
             ITEM LINELMT;             # LIMIT TO STD TRACE OUTPUT.    #
             ITEM TFLAG;               # 1 = PUT OUT TRACE.            #
      #****************************************************************#
*ENDIF
          ITEM  XRETURN I  ;  # USED FOR ERROR RETURN CODE.  NON-ZERO 
                                MEANS ERROR HAS OCCURRED               #
             ITEM STKPOINTER; 
           END      # END OF STD EXTERNALS #
      XREF PROC STDNO;             # NEGATIVE RETURN TO SYNTAX DRIVER  #
      XREF PROC STDYES;            # POSITIVE RETURN TO SYNTAX DRIVER  #
