home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD2.mdf / gnu / djgpp / src / binutils.2 / ld / ldlex.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-05-30  |  82.0 KB  |  2,769 lines
  1. /* A lexical scanner generated by flex */
  2. # line 3 "flex.skel"
  3.  
  4. /* scanner skeleton version:
  5.  */
  6.  
  7. #define FLEX_SCANNER
  8.  
  9. #include <stdio.h>
  10.  
  11.  
  12. /* cfront 1.2 defines "c_plusplus" instead of "__cplusplus" */
  13. #ifdef c_plusplus
  14. #ifndef __cplusplus
  15. #define __cplusplus
  16. #endif
  17. #endif
  18.  
  19.  
  20. #ifdef __cplusplus
  21.  
  22. #include <stdlib.h>
  23. #include <osfcn.h>
  24.  
  25. /* use prototypes in function declarations */
  26. #define YY_USE_PROTOS
  27.  
  28. /* the "const" storage-class-modifier is valid */
  29. #define YY_USE_CONST
  30.  
  31. #else    /* ! __cplusplus */
  32.  
  33. #ifdef __STDC__
  34.  
  35. #ifdef __GNUC__
  36. #include <stddef.h>
  37. void *malloc( size_t );
  38. void free( void* );
  39. #else
  40. #include <stdlib.h>
  41. #endif    /* __GNUC__ */
  42.  
  43. #define YY_USE_PROTOS
  44. #define YY_USE_CONST
  45.  
  46. #endif    /* __STDC__ */
  47. #endif    /* ! __cplusplus */
  48.  
  49.  
  50. #ifdef __TURBOC__
  51. #define YY_USE_CONST
  52. #endif
  53.  
  54.  
  55. #ifndef YY_USE_CONST
  56. #define const
  57. #endif
  58.  
  59.  
  60. #ifdef YY_USE_PROTOS
  61. #define YY_PROTO(proto) proto
  62. #else
  63. #define YY_PROTO(proto) ()
  64. /* we can't get here if it's an ANSI C compiler, or a C++ compiler,
  65.  * so it's got to be a K&R compiler, and therefore there's no standard
  66.  * place from which to include these definitions
  67.  */
  68. char *malloc();
  69. int free();
  70. int read();
  71. #endif
  72.  
  73.  
  74. /* amount of stuff to slurp up with each read */
  75. #ifndef YY_READ_BUF_SIZE
  76. #define YY_READ_BUF_SIZE 8192
  77. #endif
  78.  
  79. /* returned upon end-of-file */
  80. #define YY_END_TOK 0
  81.  
  82. /* copy whatever the last rule matched to the standard output */
  83.  
  84. /* cast to (char *) is because for 8-bit chars, yytext is (unsigned char *) */
  85. /* this used to be an fputs(), but since the string might contain NUL's,
  86.  * we now use fwrite()
  87.  */
  88. #define ECHO (void) fwrite( (char *) yytext, yyleng, 1, yyout )
  89.  
  90. /* gets input and stuffs it into "buf".  number of characters read, or YY_NULL,
  91.  * is returned in "result".
  92.  */
  93. #define YY_INPUT(buf,result,max_size) \
  94.     if ( (result = read( fileno(yyin), (char *) buf, max_size )) < 0 ) \
  95.         YY_FATAL_ERROR( "read() in flex scanner failed" );
  96. #define YY_NULL 0
  97.  
  98. /* no semi-colon after return; correct usage is to write "yyterminate();" -
  99.  * we don't want an extra ';' after the "return" because that will cause
  100.  * some compilers to complain about unreachable statements.
  101.  */
  102. #define yyterminate() return ( YY_NULL )
  103.  
  104. /* report a fatal error */
  105.  
  106. /* The funky do-while is used to turn this macro definition into
  107.  * a single C statement (which needs a semi-colon terminator).
  108.  * This avoids problems with code like:
  109.  *
  110.  *     if ( something_happens )
  111.  *        YY_FATAL_ERROR( "oops, the something happened" );
  112.  *    else
  113.  *        everything_okay();
  114.  *
  115.  * Prior to using the do-while the compiler would get upset at the
  116.  * "else" because it interpreted the "if" statement as being all
  117.  * done when it reached the ';' after the YY_FATAL_ERROR() call.
  118.  */
  119.  
  120. #define YY_FATAL_ERROR(msg) \
  121.     do \
  122.         { \
  123.         (void) fputs( msg, stderr ); \
  124.         (void) putc( '\n', stderr ); \
  125.         exit( 1 ); \
  126.         } \
  127.     while ( 0 )
  128.  
  129. /* default yywrap function - always treat EOF as an EOF */
  130. #define yywrap() 1
  131.  
  132. /* enter a start condition.  This macro really ought to take a parameter,
  133.  * but we do it the disgusting crufty way forced on us by the ()-less
  134.  * definition of BEGIN
  135.  */
  136. #define BEGIN yy_start = 1 + 2 *
  137.  
  138. /* action number for EOF rule of a given start state */
  139. #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
  140.  
  141. /* special action meaning "start processing a new file" */
  142. #define YY_NEW_FILE \
  143.     do \
  144.         { \
  145.         yy_init_buffer( yy_current_buffer, yyin ); \
  146.         yy_load_buffer_state(); \
  147.         } \
  148.     while ( 0 )
  149.  
  150. /* default declaration of generated scanner - a define so the user can
  151.  * easily add parameters
  152.  */
  153. #define YY_DECL int yylex YY_PROTO(( void )) 
  154.  
  155. /* code executed at the end of each rule */
  156. #define YY_BREAK break;
  157.  
  158. #define YY_END_OF_BUFFER_CHAR 0
  159.  
  160. #ifndef YY_BUF_SIZE
  161. #define YY_BUF_SIZE (YY_READ_BUF_SIZE * 2) /* size of default input buffer */
  162. #endif
  163.  
  164. typedef struct yy_buffer_state *YY_BUFFER_STATE;
  165.  
  166. #define YY_CHAR char
  167. # line 1 "./ldlex.l"
  168. #define INITIAL 0
  169. # line 2 "./ldlex.l"
  170.  
  171. /* Copyright (C) 1991 Free Software Foundation, Inc.
  172.  
  173. This file is part of GLD, the Gnu Linker.
  174.  
  175. GLD is free software; you can redistribute it and/or modify
  176. it under the terms of the GNU General Public License as published by
  177. the Free Software Foundation; either version 2, or (at your option)
  178. any later version.
  179.  
  180. GLD is distributed in the hope that it will be useful,
  181. but WITHOUT ANY WARRANTY; without even the implied warranty of
  182. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  183. GNU General Public License for more details.
  184.  
  185. You should have received a copy of the GNU General Public License
  186. along with GLD; see the file COPYING.  If not, write to
  187. the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
  188.  
  189. /*
  190. This was written by steve chamberlain
  191.                     sac@cygnus.com
  192. */
  193.  
  194.  
  195. typedef int bfd_vma;
  196. #include <ansidecl.h>
  197. #include "ldgram.h"
  198.  
  199. int ldgram_in_defsym;
  200. int ldgram_had_equals;
  201. int ldgram_in_script;
  202.  
  203. int hex_mode;
  204. extern int fgetc();
  205. extern int yyparse();
  206.  
  207.  
  208.  
  209. char *buystring();
  210.  
  211. unsigned int lineno = 1;
  212. int old;
  213.  
  214. static comment();
  215.  
  216. #undef YY_INPUT
  217. #define YY_INPUT(buf,result,max_size) yy_input(buf, &result, max_size)
  218. #undef YY_FATAL_ERROR
  219. #define YY_FATAL_ERROR ;
  220. #define MAX_INCLUDE_DEPTH 10
  221. YY_BUFFER_STATE include_stack[MAX_INCLUDE_DEPTH];
  222. char *file_name_stack[MAX_INCLUDE_DEPTH];
  223. unsigned int include_stack_ptr = 0;
  224.  
  225.  
  226. /* STATES 
  227.     COMMAND         on command line
  228.     COMMENT        in a C comment
  229.     EXPRESSION    definiatelyt in an expression
  230.     SCRIPT        definately in a script
  231.     SOMEWHERE    either EXPRESSION or SCRIPT
  232.         MRI             in an MRI script
  233. */
  234. #define RTOKEN(x)  {  yylval.token = x; return x; }
  235. #define COMMAND 1
  236. #define SCRIPT 2
  237. #define EXPRESSION 3
  238. #define COMMENT 4
  239. #define BOTH 5
  240. #define DEFSYMEXP 6
  241. #define MRI 7
  242. # line 90 "./ldlex.l"
  243. # line 168 "flex.skel"
  244.  
  245. /* done after the current pattern has been matched and before the
  246.  * corresponding action - sets up yytext
  247.  */
  248. #define YY_DO_BEFORE_ACTION \
  249.     yytext = yy_bp; \
  250.     yyleng = yy_cp - yy_bp; \
  251.     yy_hold_char = *yy_cp; \
  252.     *yy_cp = '\0'; \
  253.     yy_c_buf_p = yy_cp;
  254. # line 179 "flex.skel"
  255.  
  256. #define EOB_ACT_CONTINUE_SCAN 0
  257. #define EOB_ACT_END_OF_FILE 1
  258. #define EOB_ACT_LAST_MATCH 2
  259.  
  260. /* return all but the first 'n' matched characters back to the input stream */
  261. #define yyless(n) \
  262.     do \
  263.         { \
  264.         /* undo effects of setting up yytext */ \
  265.         *yy_cp = yy_hold_char; \
  266.         yy_c_buf_p = yy_cp = yy_bp + n; \
  267.         YY_DO_BEFORE_ACTION; /* set up yytext again */ \
  268.         } \
  269.     while ( 0 )
  270.  
  271. #define unput(c) yyunput( c, yytext )
  272.  
  273.  
  274. struct yy_buffer_state
  275.     {
  276.     FILE *yy_input_file;
  277.  
  278.     YY_CHAR *yy_ch_buf;        /* input buffer */
  279.     YY_CHAR *yy_buf_pos;    /* current position in input buffer */
  280.  
  281.     /* size of input buffer in bytes, not including room for EOB characters */
  282.     int yy_buf_size;    
  283.  
  284.     /* number of characters read into yy_ch_buf, not including EOB characters */
  285.     int yy_n_chars;
  286.  
  287.     int yy_eof_status;        /* whether we've seen an EOF on this buffer */
  288. #define EOF_NOT_SEEN 0
  289.     /* "pending" happens when the EOF has been seen but there's still
  290.      * some text process
  291.      */
  292. #define EOF_PENDING 1
  293. #define EOF_DONE 2
  294.     };
  295.  
  296. static YY_BUFFER_STATE yy_current_buffer;
  297.  
  298. /* we provide macros for accessing buffer states in case in the
  299.  * future we want to put the buffer states in a more general
  300.  * "scanner state"
  301.  */
  302. #define YY_CURRENT_BUFFER yy_current_buffer
  303.  
  304.  
  305. /* yy_hold_char holds the character lost when yytext is formed */
  306. static YY_CHAR yy_hold_char;
  307.  
  308. static int yy_n_chars;        /* number of characters read into yy_ch_buf */
  309.  
  310.  
  311.  
  312. #ifndef YY_USER_ACTION
  313. #define YY_USER_ACTION
  314. #endif
  315.  
  316. #ifndef YY_USER_INIT
  317. #define YY_USER_INIT
  318. #endif
  319.  
  320. extern YY_CHAR *yytext;
  321. extern int yyleng;
  322. extern FILE *yyin, *yyout;
  323.  
  324. YY_CHAR *yytext;
  325. int yyleng;
  326.  
  327. FILE *yyin = (FILE *) 0, *yyout = (FILE *) 0;
  328.  
  329. #define YY_END_OF_BUFFER 181
  330. typedef int yy_state_type;
  331. static const short int yy_accept[912] =
  332.     {   0,
  333.         0,    0,  175,  175,  175,  175,    0,    0,    0,    0,
  334.         0,    0,    0,    0,    0,    0,  181,  180,  178,  172,
  335.       180,  172,  175,  172,  177,   83,  175,   89,   80,   96,
  336.        95,   85,   86,   79,   87,  175,   88,   59,   59,   99,
  337.       100,   90,   92,   78,   84,   59,   59,   59,   59,   59,
  338.        59,  175,  175,  175,  175,  175,  175,  175,  175,   61,
  339.        60,   59,  142,  140,  175,   94,   81,   93,   82,  174,
  340.        86,   79,   87,  174,   88,   59,   59,   99,   92,   59,
  341.        59,   59,  174,  174,   61,   60,   59,  174,   82,  174,
  342.        59,   59,   59,   59,   59,   59,   59,   59,  174,  174,
  343.  
  344.       174,  174,  174,  174,  174,  174,   59,   59,  142,  140,
  345.         5,    4,    3,    2,    4,    6,    4,  146,  173,  147,
  346.       173,   92,   59,   59,   59,   59,   59,   59,  173,  173,
  347.       173,  173,  173,  173,   59,   59,   59,   59,  173,  173,
  348.       173,  173,  172,    0,  176,  172,  175,  175,  175,  175,
  349.        49,   55,  175,   28,   14,  175,   34,   37,   47,  175,
  350.        27,   31,   22,   33,   25,   21,  175,   20,   17,  175,
  351.        13,   19,   15,   36,   30,   35,   26,   32,  175,    1,
  352.        66,   59,   59,   77,   75,   73,   71,   72,   74,   59,
  353.       175,   69,   68,   65,   67,   70,   59,   59,  175,  145,
  354.  
  355.       175,  175,  175,  175,   59,  175,  175,  175,  175,  175,
  356.       175,  175,  175,  175,  175,  175,  175,  175,  175,  175,
  357.       175,  175,  175,  175,  175,  175,  175,   59,  175,  175,
  358.       175,   76,   64,  174,   57,   57,   71,   72,   74,   59,
  359.        58,   58,   59,    0,   65,   59,   58,   58,   58,   59,
  360.       174,  145,   58,   59,  174,  174,  174,   59,  174,   59,
  361.        59,   59,   59,   59,  174,  174,  174,  174,   59,  174,
  362.       174,  174,  174,  174,  174,  174,  174,  174,  174,  174,
  363.       174,  174,  174,  174,  174,  174,  174,  174,  174,   59,
  364.       174,  174,    4,    4,    4,    4,  173,   57,   57,  147,
  365.  
  366.        59,   58,   58,   58,   59,  173,   59,   58,  173,   58,
  367.       173,  173,  173,  173,  173,  173,  173,   59,  173,  173,
  368.       173,  173,  173,  173,  173,  173,   51,   39,   39,   53,
  369.        54,   48,   56,   41,  175,   45,   46,   46,   46,   46,
  370.        18,   23,  175,   24,  175,   40,  175,  175,  175,   50,
  371.        62,   63,  175,   59,  175,  175,  175,  175,  175,  175,
  372.        59,  175,  175,  175,  175,  175,  128,  175,  175,  175,
  373.       175,  175,  113,  175,  175,  175,  175,  175,  175,  175,
  374.       175,  175,  175,  175,  175,  175,  175,  175,  143,  141,
  375.       175,  174,  174,   58,  174,   59,  174,  174,  174,  174,
  376.  
  377.       174,   59,  174,  174,  174,  174,  174,   59,  174,  174,
  378.       174,  174,  174,  128,  174,  174,  174,  174,  174,  113,
  379.       174,  174,  174,  174,  174,  174,  174,  174,  174,  174,
  380.       174,  143,  141,    4,  173,  173,  173,  173,  173,  148,
  381.       173,  173,  173,  173,  173,  173,  173,  173,  173,  173,
  382.       163,  173,  173,  173,  173,  173,  173,   39,   29,   46,
  383.        46,   46,  175,  175,  175,  175,  175,  175,  175,  108,
  384.       175,  175,  133,  175,  137,  175,  175,  175,  175,  124,
  385.       175,  175,  175,  138,  175,  175,  131,  175,  110,  175,
  386.       175,  175,  175,  175,  175,  175,  175,  175,  175,  175,
  387.  
  388.       175,  175,  175,  174,  108,  174,  174,  110,  174,  174,
  389.       174,  174,  174,  133,  174,  137,  174,  174,  174,  124,
  390.       174,  174,  174,  138,  174,  174,  131,  174,  174,  174,
  391.       174,  174,  174,  174,  174,  174,  174,  174,   59,  173,
  392.       173,  173,  152,  151,  173,  160,  155,  158,  173,  173,
  393.       161,  173,  173,  164,  173,  169,  165,  167,  173,  170,
  394.        39,   44,   46,   46,  175,  175,  175,  175,  175,  175,
  395.       175,  107,  105,  175,  175,  175,  136,  109,  130,  175,
  396.       175,  118,  175,  175,  175,  175,  175,  175,  175,  175,
  397.       175,  132,  175,  175,  175,  175,  175,  175,  174,  107,
  398.  
  399.       174,  174,  174,  174,  174,  105,  174,  174,  136,  109,
  400.       130,  174,  174,  118,  174,  174,  174,  174,  174,  174,
  401.       174,  174,  132,  174,  174,  174,  173,  153,  150,  173,
  402.       160,  160,  157,  173,  173,  173,  173,  169,  169,  166,
  403.        38,   43,   42,  175,  175,  175,   16,  175,  175,  175,
  404.       175,  175,  175,  175,  175,  175,  106,  103,  175,  135,
  405.       104,  117,  175,  175,  175,  114,  175,  129,  115,  175,
  406.       175,  174,  174,  135,  114,  174,  174,  174,  174,  174,
  407.       174,  106,  103,  174,  104,  117,  174,  174,  174,  174,
  408.       129,  115,  173,  173,  159,  156,  173,  173,  168,    7,
  409.  
  410.        12,  175,  175,  175,  175,  175,  175,  175,  119,  175,
  411.       144,  134,  175,  139,  175,  175,  175,  125,  175,  175,
  412.       174,  119,  174,  174,  174,  174,  174,  174,  144,  134,
  413.       174,  139,  174,  174,  125,  173,  173,  173,  173,    7,
  414.       175,  175,  175,  175,  162,  175,  175,  175,  175,  175,
  415.       175,  123,  175,  171,  175,  162,  174,  171,  174,  174,
  416.       174,  174,  174,  174,  174,  123,  162,  149,  154,  171,
  417.       175,  175,  175,  175,  175,  175,  175,  175,  175,  175,
  418.       175,  175,  174,  174,  174,  174,  174,  174,  174,  174,
  419.       175,  175,  175,  175,  175,  175,  175,  175,  175,  116,
  420.  
  421.       175,  175,  174,  174,  174,  174,  174,  174,  174,  116,
  422.       175,  175,  175,  175,  175,  175,  175,  175,  127,  175,
  423.       175,  175,  174,  174,  174,  174,  174,  127,  174,  175,
  424.       175,  175,   11,   10,  121,  175,  175,  175,  175,  175,
  425.       174,  174,  121,  174,  174,  174,  175,  175,  175,  175,
  426.       175,  126,  175,  175,  174,  174,  174,  174,  126,  175,
  427.       175,  175,  175,  175,  112,  111,  112,  111,  174,  174,
  428.         9,    8,  175,  175,  175,  174,  174,  175,  175,  175,
  429.       174,  174,  175,  175,  175,  174,  174,  175,  175,  175,
  430.       174,  174,  175,  175,  175,  174,  174,   52,  175,  175,
  431.  
  432.       174,  174,  120,  175,  120,  174,  175,  174,  122,  122,
  433.         0
  434.     } ;
  435.  
  436. static const YY_CHAR yy_ec[128] =
  437.     {   0,
  438.         1,    1,    1,    1,    1,    1,    1,    1,    2,    3,
  439.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  440.         1,    1,    1,    1,    1,    1,    1,    1,    1,    1,
  441.         1,    2,    4,    5,    1,    6,    7,    8,    1,    9,
  442.        10,   11,   12,   13,   14,   15,   16,   17,   18,   18,
  443.        18,   18,   18,   18,   18,   18,   18,   19,   20,   21,
  444.        22,   23,   24,    1,   25,   26,   27,   28,   29,   30,
  445.        31,   32,   33,   34,   35,   36,   37,   38,   39,   40,
  446.        15,   41,   42,   43,   44,   45,   15,   46,   47,   48,
  447.        49,   15,   50,    1,   51,    1,   52,   53,   54,   55,
  448.  
  449.        56,   57,   58,   59,   60,   15,   61,   62,   63,   64,
  450.        65,   66,   15,   67,   68,   69,   70,   71,   15,   72,
  451.        73,   74,   75,   76,   77,   78,    1
  452.     } ;
  453.  
  454. static const YY_CHAR yy_meta[79] =
  455.     {   0,
  456.         1,    1,    2,    3,    1,    4,    1,    3,    1,    1,
  457.         1,    4,    5,    4,    6,    6,    7,    7,    4,    1,
  458.         3,    5,    3,    1,    7,    7,    7,    7,    7,    7,
  459.         6,    6,    6,    6,    7,    6,    7,    6,    6,    6,
  460.         6,    6,    6,    6,    6,    6,    6,    6,    4,    4,
  461.         6,    7,    7,    7,    7,    7,    7,    6,    6,    6,
  462.         7,    6,    7,    6,    6,    6,    6,    6,    6,    6,
  463.         6,    7,    6,    6,    1,    1,    1,    4
  464.     } ;
  465.  
  466. static const short int yy_base[936] =
  467.     {   0,
  468.         0,    0,    0,   77,  154,    0,  232,    0,    0,    0,
  469.       305,    0,  370,    0,  448,    0, 1757, 1758, 1758,    0,
  470.      1751,    9,  521,   14, 1758, 1733,  583, 1758,    4, 1758,
  471.      1758, 1732, 1731,    0, 1730,    0,   16,  624, 1679,    0,
  472.      1758,    7, 1728,   11, 1758,   17,    0,    1,    2,   11,
  473.        18, 1708, 1699,   17,   23,   26,   17,   63, 1705,    0,
  474.         0,   41, 1667, 1649, 1617, 1758,   28, 1758,    0,  680,
  475.      1651, 1758, 1605,    0,   48,  721, 1554, 1758, 1603,  777,
  476.        79,   83,   79, 1591, 1758, 1758,   88, 1563,    0,  824,
  477.       291,  292,  629,  597,   86,  682,  610,  782, 1586, 1583,
  478.  
  479.        91,   38,   99,   88,  573, 1595,  651,  665, 1563, 1551,
  480.      1758,  865, 1758, 1758,    0, 1758,  906, 1758,  953,    0,
  481.         0, 1758,  994,  109,  110,  114,  313,  330,  104, 1592,
  482.      1575, 1571, 1585, 1572,  571,  657,  592,  648,    4, 1560,
  483.      1544, 1554,    0, 1604, 1758,  719,    0,    0, 1540,  288,
  484.         0,  295,    0, 1555,    0,    0,    0,    0,  475, 1539,
  485.         0,    0,    0,    0,  475,    0, 1540,    0,    0,    0,
  486.      1539,    0, 1547, 1537,    0,    0,    0,    0,    0, 1758,
  487.      1758,    0, 1529, 1758, 1758, 1758,    0,    0,    0,    0,
  488.       694, 1578, 1758,    0, 1758, 1577,  273,  293, 1565,    0,
  489.  
  490.      1558, 1553,    1, 1566,   72, 1565, 1550, 1556, 1552, 1549,
  491.      1553,  714, 1550, 1549, 1546, 1548, 1538,  289, 1550, 1539,
  492.      1552,   41, 1541, 1531, 1553, 1530, 1530,  248, 1506, 1511,
  493.      1494, 1758, 1758,    0, 1041, 1495, 1758, 1758,    0, 1493,
  494.      1487, 1758, 1758,  724, 1758, 1097, 1514, 1522,    0,    0,
  495.      1516,    0,    0, 1518, 1501, 1510, 1497, 1476, 1469,  763,
  496.       811,    0,  867,  838, 1503, 1498,  558, 1511,  912, 1510,
  497.      1495, 1501, 1497, 1494, 1498,  741, 1495, 1494, 1491, 1493,
  498.       310, 1496, 1485, 1498,  590, 1487, 1500, 1482, 1482,  929,
  499.      1458, 1463,    0, 1448,    0,    0,    0, 1153, 1447,    0,
  500.  
  501.      1209, 1476,    0,    0,    0, 1484, 1474, 1482, 1486, 1472,
  502.      1470, 1486, 1473, 1481, 1482, 1480, 1462, 1437, 1444, 1448,
  503.      1435, 1433, 1443, 1431, 1438, 1438,    0,    0, 1422,    0,
  504.         0,    0,  300,    0, 1424,    0,    0, 1420, 1430, 1423,
  505.         0,    0, 1416,    0, 1405,    0, 1411,  557, 1403,    0,
  506.      1758, 1758, 1430,   76, 1437, 1440, 1437, 1423, 1417, 1438,
  507.       571, 1435, 1420, 1424, 1434, 1431,    0, 1421, 1417, 1411,
  508.      1423, 1422,    0, 1413, 1408, 1414, 1410, 1417, 1407, 1405,
  509.      1404, 1401, 1402, 1413, 1400, 1404, 1408, 1373,    0,    0,
  510.      1381, 1419, 1396, 1393, 1402, 1399, 1388, 1391, 1400, 1363,
  511.  
  512.      1371, 1000, 1399, 1396, 1382, 1371, 1392,  852, 1389, 1374,
  513.      1378, 1388, 1384,    0, 1369, 1363, 1352, 1364, 1363,    0,
  514.      1354, 1356, 1360, 1350, 1348, 1347, 1344, 1345, 1344, 1348,
  515.      1352,    0,    0,  727, 1265, 1343,  598, 1352, 1340,    0,
  516.      1342, 1335, 1349, 1347, 1346, 1338, 1330, 1334, 1306, 1304,
  517.         0, 1306, 1299, 1312, 1310, 1309, 1295, 1311,    0, 1294,
  518.      1292, 1288, 1291, 1295, 1293, 1304, 1303, 1285, 1317,    0,
  519.      1314, 1316,    0, 1307,    0, 1306, 1310, 1304, 1294,    0,
  520.      1297, 1310, 1294,    0, 1294, 1293,    0, 1293,    0, 1289,
  521.      1300, 1283, 1271, 1278, 1286, 1279, 1268, 1271, 1266, 1275,
  522.  
  523.      1278, 1244, 1240, 1268,    0, 1265, 1264,    0, 1276, 1261,
  524.      1237, 1233, 1262,    0, 1253,    0, 1246, 1245, 1240,    0,
  525.      1243, 1256, 1240,    0, 1237, 1236,    0, 1237, 1238, 1243,
  526.      1231, 1238, 1246, 1239, 1228, 1227, 1236, 1239,  728, 1231,
  527.      1218, 1221,    0,    0, 1233, 1322,    0,    0, 1216, 1223,
  528.         0, 1227, 1191,    0, 1200, 1399,    0,    0, 1184,    0,
  529.      1181,    0, 1197, 1178, 1173, 1193, 1185, 1171, 1182,  611,
  530.      1196,    0,    0, 1192, 1203, 1202,    0,    0,    0, 1179,
  531.      1201,    0, 1196, 1177, 1198, 1194, 1183, 1177, 1194, 1186,
  532.      1178,    0, 1185, 1169, 1186, 1168, 1134, 1146, 1158,    0,
  533.  
  534.      1172, 1172, 1169, 1128, 1140,    0, 1155, 1166,    0,    0,
  535.         0, 1143, 1165,    0, 1160, 1144, 1164, 1149, 1143, 1160,
  536.      1152, 1138,    0, 1132, 1149, 1131, 1129,    0, 1135, 1125,
  537.         0, 1476,    0, 1140, 1141, 1095, 1095,    0, 1553,    0,
  538.         0,    0,    0, 1100, 1093, 1101,    0, 1096, 1105, 1104,
  539.      1114, 1112, 1104, 1120, 1120, 1117,    0,    0, 1102,    0,
  540.         0, 1093, 1095, 1090, 1102, 1088, 1098,    0,    0, 1068,
  541.      1084, 1091, 1105,    0, 1081, 1062, 1079, 1084, 1070, 1093,
  542.      1090,    0,    0, 1075,    0, 1066, 1069, 1061, 1073, 1070,
  543.         0,    0, 1066, 1069,    0,    0, 1064, 1037,    0,  619,
  544.  
  545.         0, 1052, 1089, 1036, 1035, 1070, 1065, 1052,    0, 1051,
  546.         0,    0,  645,    0, 1061, 1046, 1055,    0, 1030, 1026,
  547.      1055,    0, 1051, 1026, 1022, 1053, 1040, 1038,    0,    0,
  548.       664,    0, 1047, 1032,    0, 1044, 1044, 1036, 1008,  628,
  549.      1002,  992,  993,  991,    0, 1010, 1026, 1008, 1003, 1004,
  550.      1009,    0, 1010,    0,  982,    0, 1007,    0,  978,  989,
  551.      1002,  990,  984,  979,  983,    0,    0,    0,    0,    0,
  552.       946,  941,  950,  941,  964,  968,  964,  973,  958,  957,
  553.       971,  943,  969,  941,  952,  955,  951,  960,  945,  944,
  554.       701,  921,  912,  911,  933,  943,  929,  933,  920,    0,
  555.  
  556.       928,  900,  926,  898,  911,  922,  911,  916,  908,    0,
  557.       888,  884,  886,  874,  873,  885,  899,  887,    0,  891,
  558.       885,  856,  882,  854,  866,  880,  868,    0,  880,  831,
  559.        27,   74,    0,    0,    0,  108,  285,  307,  327,  465,
  560.       501,  478,    0,  560,  612,  624,  613,  635,  633,  650,
  561.       678,    0,  676,  652,  679,  654,  674,  705,    0,  715,
  562.       716,  704,  737,  747,    0,    0,    0,    0,  744,  756,
  563.         0,    0,  782,  750,  765,  761,  774,  754,  785,  786,
  564.       790,  797,  777,  813,  817,  821,  829,  795,  819,  834,
  565.       821,  836,  806,  827,  821,  829,  824,    0,  826,  837,
  566.  
  567.       829,  853,    0,  849,    0,  857,  859,  860,    0,    0,
  568.      1758, 1630, 1637, 1642, 1649, 1654, 1658, 1662,  893, 1664,
  569.      1668, 1675, 1679, 1683, 1687, 1691, 1695, 1699, 1703, 1707,
  570.      1714, 1721, 1728, 1735, 1742
  571.     } ;
  572.  
  573. static const short int yy_def[936] =
  574.     {   0,
  575.       912,  912,  913,  913,  911,    5,  911,    7,  912,  912,
  576.         7,   11,  911,   13,  911,   15,  911,  911,  911,  914,
  577.       915,  916,  911,  916,  911,  911,  917,  911,  911,  911,
  578.       911,  911,  917,  917,  917,  917,  917,  917,   38,  917,
  579.       911,  911,  917,  911,  911,   38,   38,   38,   38,   38,
  580.        38,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  581.       917,   38,  917,  917,  917,  911,  911,  911,  917,  918,
  582.       911,  911,  911,  918,  918,  911,   76,  911,  911,  918,
  583.        80,   80,  918,  918,  911,  911,   80,  918,  918,  918,
  584.       919,  919,   90,   90,   90,   90,   90,   90,  918,  918,
  585.  
  586.       918,  918,  918,  918,  918,  918,   90,   90,  918,  918,
  587.       911,  920,  911,  911,  920,  911,  920,  911,  921,  922,
  588.       921,  911,  921,  123,  123,  123,  123,  123,  921,  921,
  589.       921,  921,  921,  921,  123,  123,  123,  123,  921,  921,
  590.       921,  921,  914,  915,  911,  916,  917,  923,  924,  917,
  591.       925,  917,  926,  917,  917,  927,  917,  917,  928,  917,
  592.       917,  917,  917,  917,  917,  917,  917,  917,  917,  929,
  593.       917,  917,  917,  917,  917,  917,  917,  917,  930,  911,
  594.       911,   38,   38,  911,  911,  911,  917,  917,  917,  917,
  595.        38,  911,  911,  917,  911,  911,   38,   38,  917,  917,
  596.  
  597.       917,  917,  917,  917,   38,  917,  917,  917,  917,  917,
  598.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  599.       917,  917,  917,  917,  917,  917,  917,   38,  917,  917,
  600.       917,  911,  911,  918,  918,  235,  911,  911,  918,   76,
  601.        76,  911,  911,   92,  911,  235,  246,  246,  918,  918,
  602.       918,  918,  246,  246,  918,  918,  918,  246,  918,   90,
  603.        90,   92,   90,   90,  918,  918,  918,  918,   90,  918,
  604.       918,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  605.       918,  918,  918,  918,  918,  918,  918,  918,  918,   90,
  606.       918,  918,  920,  117,  117,  920,  921,  921,  298,  931,
  607.  
  608.       298,  301,  301,  921,  921,  921,  301,  921,  921,  921,
  609.       921,  921,  921,  921,  921,  921,  921,  301,  921,  921,
  610.       921,  921,  921,  921,  921,  921,  923,  924,  924,  917,
  611.       917,  925,  917,  926,  917,  927,  928,  928,  928,  928,
  612.       917,  917,  917,  917,  917,  929,  917,  917,  917,  930,
  613.       911,  911,  917,   38,  917,  917,  917,  917,  917,  917,
  614.        38,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  615.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  616.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  617.       917,   90,  918,  246,  918,  246,  918,  918,  918,  918,
  618.  
  619.       918,   90,  918,  918,  918,  918,  918,   90,  918,  918,
  620.       918,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  621.       918,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  622.       918,  918,  918,  117,  921,  921,  921,  921,  921,  921,
  623.       921,  921,  921,  921,  921,  921,  921,  921,  921,  921,
  624.       921,  921,  921,  921,  921,  921,  921,  924,  917,  928,
  625.       928,  928,  917,  917,  917,  917,  917,  917,  917,  917,
  626.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  627.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  628.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  629.  
  630.       917,  917,  917,  918,  918,  918,  918,  918,  918,  918,
  631.       918,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  632.       918,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  633.       918,  918,  918,  918,  918,  918,  918,  918,  435,  921,
  634.       921,  921,  921,  921,  921,  932,  921,  921,  921,  921,
  635.       921,  921,  921,  921,  921,  933,  921,  921,  921,  921,
  636.       924,  928,  928,  928,  917,  917,  917,  917,  917,  917,
  637.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  638.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  639.       917,  917,  917,  917,  917,  917,  917,  917,  918,  918,
  640.  
  641.       918,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  642.       918,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  643.       918,  918,  918,  918,  918,  918,  921,  921,  921,  921,
  644.       934,  932,  921,  921,  921,  921,  921,  935,  933,  921,
  645.       924,  928,  928,  917,  917,  917,  917,  917,  917,  917,
  646.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  647.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  648.       917,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  649.       918,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  650.       918,  918,  921,  921,  921,  921,  921,  921,  921,  917,
  651.  
  652.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  653.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  654.       918,  918,  918,  918,  918,  918,  918,  918,  918,  918,
  655.       918,  918,  918,  918,  918,  921,  921,  921,  921,  911,
  656.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  657.       917,  917,  917,  917,  917,  918,  918,  918,  918,  918,
  658.       918,  918,  918,  918,  918,  918,  921,  921,  921,  921,
  659.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  660.       917,  917,  918,  918,  918,  918,  918,  918,  918,  918,
  661.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  662.  
  663.       917,  917,  918,  918,  918,  918,  918,  918,  918,  918,
  664.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  665.       917,  917,  918,  918,  918,  918,  918,  918,  918,  917,
  666.       917,  917,  917,  917,  917,  917,  917,  917,  917,  917,
  667.       918,  918,  918,  918,  918,  918,  917,  917,  917,  917,
  668.       917,  917,  917,  917,  918,  918,  918,  918,  918,  917,
  669.       917,  917,  917,  917,  917,  917,  918,  918,  918,  918,
  670.       917,  917,  917,  917,  917,  918,  918,  917,  917,  917,
  671.       918,  918,  917,  917,  917,  918,  918,  917,  917,  917,
  672.       918,  918,  917,  917,  917,  918,  918,  917,  917,  917,
  673.  
  674.       918,  918,  917,  917,  918,  918,  917,  918,  917,  918,
  675.         0,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  676.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  677.       911,  911,  911,  911,  911
  678.     } ;
  679.  
  680. static const short int yy_nxt[1837] =
  681.     {   0,
  682.        18,   19,   18,   20,   21,  911,   18,   20,   18,   18,
  683.        18,  184,  143,   23,  911,   24,  143,  143,  911,   18,
  684.        20,  143,   20,   18,  180,  185,  180,  192,  193,  143,
  685.       205,  143,  195,  196,  143,  201,  143,  189,  358,  203,
  686.       359,  204,  197,  206,  198,  213,  202,  215,  207,  232,
  687.       208,  216,  199,  209,  217,  214,  210,  219,  180,  200,
  688.       220,  221,  279,  322,  218,  381,  280,  382,  323,  239,
  689.       911,  147,  147,  147,   18,   18,   18,   18,   19,   18,
  690.        20,   21,  147,   18,   20,   18,   18,   18,  147,  147,
  691.        23,  222,   24,  228,  223,  224,   18,   20,  848,   20,
  692.  
  693.        18,  361,  261,  233,  253,  225,  253,  255,  253,  226,
  694.       253,  254,  147,  253,  234,  253,  470,  256,  234,  277,
  695.       250,  234,  250,  234,  267,  234,  268,  255,  282,  278,
  696.       234,  283,  284,  307,  303,  303,  311,  281,  849,  303,
  697.       258,  308,  312,  147,  297,  297,  250,  147,  250,  297,
  698.       850,   18,   18,   18,   18,   19,   25,   26,   21,   27,
  699.        28,   29,   30,   31,   32,   33,   34,   35,   36,   37,
  700.        38,   39,   40,   41,   42,   43,   44,   45,   46,   47,
  701.        48,   49,   50,   51,   36,   52,   53,   36,   36,   54,
  702.        55,   56,   57,   36,   36,   58,   59,   36,   36,   36,
  703.  
  704.        36,   36,   60,   61,   36,   62,   39,   39,   39,   39,
  705.        39,   36,   36,   36,   36,   63,   36,   36,   64,   36,
  706.        36,   65,   36,   36,   36,   36,   36,   36,   66,   67,
  707.        68,   69,   18,   19,   25,   26,   21,   70,   28,   29,
  708.        30,   31,   32,   71,   72,   73,   74,   75,   76,   77,
  709.        78,   41,   42,   79,   44,   45,   80,   81,   81,   82,
  710.        81,   81,   74,   74,   74,   74,   74,   74,   74,   83,
  711.        74,   74,   74,   84,   74,   74,   74,   74,   74,   74,
  712.        85,   86,   74,   87,   81,   81,   81,   81,   81,   74,
  713.        74,   74,   74,   74,   74,   74,   74,   74,   74,   88,
  714.  
  715.        74,   74,   74,   74,   74,   74,   66,   67,   68,   89,
  716.        90,  333,  333,  330,  353,  388,  333,  333,  376,  147,
  717.       354,   91,   92,  331,  377,  243,  243,  243,  243,   93,
  718.        94,   95,   96,   97,   98,  851,   99,  100,  303,  422,
  719.       101,  102,  103,  104,  147,  398,  105,  106,  297,  852,
  720.       309,  243,  243,  243,  243,  303,  107,  108,  108,  108,
  721.       108,  108,  244,  911,  147,  297,  109,  853,  310,  110,
  722.        18,  111,   18,   18,   18,  112,   18,   18,   18,   18,
  723.        18,  113,   18,  114,  115,  115,   91,   92,   18,   18,
  724.        18,  116,   18,   18,  117,  117,  117,  117,  117,  117,
  725.  
  726.       115,  115,  115,  115,  115,  115,  115,  115,  115,  115,
  727.       115,  115,  115,  115,  115,  115,  115,  115,   18,   18,
  728.       115,  117,  117,  117,  117,  117,  117,  115,  115,  115,
  729.       115,  115,  115,  115,  115,  115,  115,  115,  115,  115,
  730.       115,  115,  115,  115,   18,   18,   18,  115,   18,   19,
  731.       118,   18,   18,  119,   18,   18,   18,   18,  120,   18,
  732.        72,   18,  121,  121,   76,   77,   18,   18,   18,  122,
  733.        18,   18,  123,  124,  125,  126,  127,  128,  121,  121,
  734.       121,  121,  121,  129,  121,  130,  131,  132,  121,  133,
  735.       134,  121,  121,  121,  121,  121,   18,   18,  121,  135,
  736.  
  737.       126,  136,  126,  137,  138,  121,  121,  121,  121,  139,
  738.       121,  140,  141,  121,  121,  142,  121,  121,  121,  121,
  739.       121,  121,   18,   18,   18,  121,  147,  338,  342,  339,
  740.       343,  854,  147,  147,  147,  147,  147,  147,  147,  147,
  741.       344,  855,  147,  340,  856,  148,  149,  147,  147,  150,
  742.       151,  152,  147,  147,  147,  147,  153,  154,  155,  156,
  743.       147,  157,  158,  159,  160,  161,  162,  147,  147,  147,
  744.       147,  147,  147,  163,  164,  165,  166,  167,  168,  147,
  745.       169,  147,  170,  147,  171,  172,  147,  173,  174,  175,
  746.       176,  177,  178,  179,  147,  405,  303,  406,  147,  182,
  747.  
  748.       183,  285,  857,  477,  286,  257,  297,  183,  183,  183,
  749.       183,  183,  183,  261,  426,  287,  427,  303,  466,  288,
  750.       740,  740,  541,  318,  649,  467,  261,  297,  542,  740,
  751.       740,  250,  265,  250,  183,  183,  183,  183,  183,  183,
  752.       183,  183,  147,  266,  250,  261,  250,  271,  183,  183,
  753.       183,  183,  183,  183,  263,  320,  264,  250,  190,  250,
  754.       190,  650,  858,  250,  251,  250,  859,  261,  860,  749,
  755.       250,  252,  250,  303,  750,  183,  183,  183,  183,  183,
  756.       183,  261,  303,  297,  190,  250,  190,  250,  763,  250,
  757.       861,  250,  297,  764,  862,  191,  235,  236,  261,  250,
  758.  
  759.       863,  250,  864,  290,  236,  236,  236,  236,  236,  236,
  760.       269,  250,  321,  250,  811,  319,  250,  865,  250,  866,
  761.       867,  868,  143,  270,  869,  250,  143,  250,  147,  870,
  762.       147,  236,  236,  236,  236,  236,  236,  240,  240,  143,
  763.       368,  143,  250,  369,  250,  240,  241,  240,  241,  240,
  764.       240,  812,  242,  370,  147,  243,  147,  243,  911,  242,
  765.       911,  293,  305,  293,  305,  147,  242,  415,  871,  872,
  766.       416,  873,  240,  240,  240,  240,  240,  240,  874,  261,
  767.       417,  243,  875,  243,  911,  876,  911,  293,  305,  293,
  768.       305,  877,  244,  246,  246,  878,  879,  250,  261,  250,
  769.  
  770.       880,  246,  247,  246,  248,  246,  246,  881,  249,  882,
  771.       883,  250,  251,  250,  272,  249,  250,  273,  250,  252,
  772.       274,  884,  249,  250,  885,  250,  886,  261,  246,  246,
  773.       246,  246,  246,  246,  392,  887,  888,  250,  889,  250,
  774.       260,  261,  250,  890,  250,  250,  891,  250,  261,  261,
  775.       261,  261,  261,  261,  261,  892,  893,  894,  895,  896,
  776.       897,  898,  899,  900,  901,  402,  902,  903,  261,  904,
  777.       905,  250,  250,  250,  250,  261,  261,  261,  261,  261,
  778.       261,  294,  295,  261,  507,  906,  250,  907,  250,  295,
  779.       295,  295,  295,  295,  295,  908,  909,  910,  250,  262,
  780.  
  781.       250,  250,  847,  250,  846,  845,  844,  843,  393,  842,
  782.       841,  840,  250,  839,  250,  838,  295,  295,  295,  295,
  783.       295,  295,  295,  295,  837,  836,  835,  250,  261,  250,
  784.       295,  295,  295,  295,  295,  295,  834,  833,  832,  831,
  785.       296,  408,  296,  830,  829,  261,  250,  828,  250,  827,
  786.       826,  825,  824,  823,  822,  821,  820,  295,  295,  295,
  787.       295,  295,  295,  250,  819,  250,  296,  818,  296,  298,
  788.       299,  817,  250,  816,  250,  815,  814,  299,  299,  299,
  789.       299,  299,  299,  813,  810,  809,  808,  807,  806,  250,
  790.       805,  250,  804,  803,  802,  801,  400,  800,  799,  798,
  791.  
  792.       797,  796,  795,  794,  299,  299,  299,  299,  299,  299,
  793.       301,  301,  793,  792,  791,  790,  261,  789,  301,  302,
  794.       301,  303,  301,  301,  788,  304,  787,  786,  305,  306,
  795.       305,  785,  304,  784,  250,  783,  250,  782,  781,  304,
  796.       505,  780,  779,  778,  777,  301,  301,  301,  301,  301,
  797.       301,  776,  775,  774,  305,  773,  305,  236,  236,  772,
  798.       250,  771,  250,  770,  769,  236,  236,  236,  236,  236,
  799.       236,  768,  767,  766,  765,  250,  762,  250,  761,  760,
  800.       759,  758,  757,  756,  755,  754,  753,  752,  751,  748,
  801.       747,  746,  236,  236,  236,  236,  236,  236,  745,  744,
  802.  
  803.       743,  250,  742,  250,  741,  739,  738,  737,  736,  735,
  804.       734,  733,  392,  246,  246,  732,  731,  730,  729,  728,
  805.       727,  246,  253,  246,  253,  246,  246,  726,  249,  725,
  806.       724,  723,  722,  721,  720,  249,  719,  718,  717,  716,
  807.       715,  714,  249,  713,  712,  711,  710,  709,  246,  246,
  808.       246,  246,  246,  246,  708,  707,  706,  705,  704,  703,
  809.       702,  701,  700,  699,  698,  697,  696,  695,  234,  299,
  810.       299,  694,  693,  692,  691,  690,  689,  299,  299,  299,
  811.       299,  299,  299,  688,  687,  686,  685,  305,  684,  305,
  812.       683,  682,  681,  680,  679,  678,  677,  676,  675,  674,
  813.  
  814.       673,  672,  671,  670,  299,  299,  299,  299,  299,  299,
  815.       669,  668,  667,  305,  666,  305,  665,  664,  663,  662,
  816.       661,  660,  659,  658,  435,  301,  301,  657,  656,  655,
  817.       654,  653,  652,  301,  303,  301,  303,  301,  301,  651,
  818.       304,  648,  647,  646,  645,  644,  643,  304,  642,  641,
  819.       640,  637,  636,  635,  304,  634,  633,  630,  629,  628,
  820.       301,  301,  301,  301,  301,  301,  627,  626,  625,  624,
  821.       623,  622,  621,  620,  619,  618,  617,  616,  615,  614,
  822.       297,  539,  539,  613,  612,  611,  610,  609,  608,  539,
  823.       539,  539,  539,  539,  539,  607,  606,  605,  604,  603,
  824.  
  825.       602,  601,  600,  599,  598,  597,  596,  595,  594,  593,
  826.       592,  591,  590,  589,  588,  587,  539,  539,  539,  539,
  827.       539,  539,  631,  631,  586,  631,  631,  585,  631,  631,
  828.       631,  631,  631,  584,  631,  583,  582,  581,  580,  579,
  829.       578,  631,  631,  631,  631,  631,  577,  576,  575,  574,
  830.       573,  572,  571,  570,  569,  568,  567,  566,  565,  564,
  831.       563,  562,  561,  560,  559,  558,  557,  556,  555,  554,
  832.       553,  552,  551,  550,  549,  548,  547,  546,  545,  544,
  833.       543,  540,  538,  537,  536,  535,  534,  533,  532,  531,
  834.       530,  529,  528,  527,  526,  525,  631,  631,  631,  638,
  835.  
  836.       638,  524,  638,  638,  523,  638,  638,  638,  638,  638,
  837.       522,  638,  521,  520,  519,  518,  517,  516,  638,  638,
  838.       638,  638,  638,  515,  514,  513,  512,  511,  510,  509,
  839.       508,  507,  506,  505,  504,  261,  503,  502,  501,  500,
  840.       499,  498,  497,  496,  495,  494,  493,  492,  491,  490,
  841.       489,  488,  487,  486,  485,  484,  483,  482,  481,  480,
  842.       479,  478,  476,  475,  474,  473,  472,  471,  469,  468,
  843.       465,  464,  463,  638,  638,  638,  631,  631,  462,  631,
  844.       631,  461,  631,  631,  631,  631,  631,  460,  631,  459,
  845.       458,  457,  456,  455,  454,  631,  631,  631,  631,  631,
  846.  
  847.       453,  452,  451,  450,  449,  448,  447,  446,  445,  444,
  848.       443,  442,  441,  440,  439,  438,  437,  436,  297,  434,
  849.       433,  432,  431,  430,  429,  428,  425,  424,  423,  421,
  850.       420,  419,  418,  414,  413,  412,  411,  410,  409,  407,
  851.       404,  403,  401,  400,  399,  398,  397,  396,  395,  394,
  852.       631,  631,  631,  638,  638,  393,  638,  638,  911,  638,
  853.       638,  638,  638,  638,  911,  638,  234,  391,  390,  389,
  854.       387,  386,  638,  638,  638,  638,  638,  385,  384,  383,
  855.       380,  379,  378,  375,  374,  373,  372,  371,  367,  366,
  856.       365,  364,  363,  362,  360,  357,  356,  355,  352,  351,
  857.  
  858.       147,  349,  348,  347,  345,  341,  335,  329,  145,  326,
  859.       325,  324,  317,  316,  315,  314,  313,  292,  291,  289,
  860.       276,  275,  259,  257,  245,  911,  238,  638,  638,  638,
  861.        18,   18,   18,   18,   18,   18,   18,   22,   22,   22,
  862.        22,   22,   22,   22,  143,  143,  143,  143,  143,  144,
  863.       144,  144,  144,  144,  144,  144,  146,  146,  146,  146,
  864.       146,  147,  147,  147,  147,  234,  234,  234,  234,  293,
  865.       293,  297,  237,  297,  297,  300,  231,  300,  300,  300,
  866.       300,  300,  327,  327,  327,  327,  328,  328,  328,  328,
  867.       332,  332,  332,  332,  334,  334,  334,  334,  336,  336,
  868.  
  869.       336,  336,  337,  337,  337,  337,  346,  346,  346,  346,
  870.       350,  350,  350,  350,  300,  230,  300,  300,  300,  300,
  871.       300,  632,  229,  632,  632,  632,  632,  632,  639,  227,
  872.       639,  639,  639,  639,  639,  631,  212,  631,  631,  631,
  873.       631,  631,  638,  211,  638,  638,  638,  638,  638,  194,
  874.       147,  188,  187,  186,  181,  145,  911,   17,  911,  911,
  875.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  876.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  877.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  878.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  879.  
  880.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  881.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  882.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  883.       911,  911,  911,  911,  911,  911
  884.     } ;
  885.  
  886. static const short int yy_chk[1837] =
  887.     {   0,
  888.         3,    3,    3,    3,    3,    0,    3,    3,    3,    3,
  889.         3,   29,   22,    3,    0,    3,   22,   24,    0,    3,
  890.         3,   24,    3,    3,   24,   29,   37,   42,   42,   22,
  891.        49,   22,   44,   44,   24,   47,   24,   37,  203,   48,
  892.       203,   48,   46,   49,   46,   54,   47,   55,   50,   67,
  893.        51,   55,   46,   51,   56,   54,   51,   57,   75,   46,
  894.        57,   57,  102,  139,   56,  222,  102,  222,  139,   75,
  895.         0,   47,   48,   49,    3,    3,    3,    4,    4,    4,
  896.         4,    4,   50,    4,    4,    4,    4,    4,   46,   51,
  897.         4,   58,    4,   62,   58,   58,    4,    4,  831,    4,
  898.  
  899.         4,  205,   95,   67,   81,   58,   81,   83,   82,   58,
  900.        82,   82,   62,   87,   81,   87,  354,   83,   82,  101,
  901.        95,   81,   95,   87,   95,   82,   95,  103,  104,  101,
  902.        87,  104,  104,  124,  124,  125,  129,  103,  832,  126,
  903.        87,  125,  129,  205,  124,  125,   95,  354,   95,  126,
  904.       836,    4,    4,    4,    5,    5,    5,    5,    5,    5,
  905.         5,    5,    5,    5,    5,    5,    5,    5,    5,    5,
  906.         5,    5,    5,    5,    5,    5,    5,    5,    5,    5,
  907.         5,    5,    5,    5,    5,    5,    5,    5,    5,    5,
  908.         5,    5,    5,    5,    5,    5,    5,    5,    5,    5,
  909.  
  910.         5,    5,    5,    5,    5,    5,    5,    5,    5,    5,
  911.         5,    5,    5,    5,    5,    5,    5,    5,    5,    5,
  912.         5,    5,    5,    5,    5,    5,    5,    5,    5,    5,
  913.         5,    5,    7,    7,    7,    7,    7,    7,    7,    7,
  914.         7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
  915.         7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
  916.         7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
  917.         7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
  918.         7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
  919.         7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
  920.  
  921.         7,    7,    7,    7,    7,    7,    7,    7,    7,    7,
  922.        11,  152,  152,  150,  197,  228,  333,  333,  218,  228,
  923.       198,   11,   11,  150,  218,   91,   92,   91,   92,   11,
  924.        11,   11,   11,   11,   11,  837,   11,   11,  127,  281,
  925.        11,   11,   11,   11,  197,  281,   11,   11,  127,  838,
  926.       127,   91,   92,   91,   92,  128,   11,   11,   11,   11,
  927.        11,   11,   91,   92,  198,  128,   11,  839,  128,   11,
  928.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  929.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  930.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  931.  
  932.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  933.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  934.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  935.        13,   13,   13,   13,   13,   13,   13,   13,   13,   13,
  936.        13,   13,   13,   13,   13,   13,   13,   13,   15,   15,
  937.        15,   15,   15,   15,   15,   15,   15,   15,   15,   15,
  938.        15,   15,   15,   15,   15,   15,   15,   15,   15,   15,
  939.        15,   15,   15,   15,   15,   15,   15,   15,   15,   15,
  940.        15,   15,   15,   15,   15,   15,   15,   15,   15,   15,
  941.        15,   15,   15,   15,   15,   15,   15,   15,   15,   15,
  942.  
  943.        15,   15,   15,   15,   15,   15,   15,   15,   15,   15,
  944.        15,   15,   15,   15,   15,   15,   15,   15,   15,   15,
  945.        15,   15,   15,   15,   15,   15,   23,  159,  165,  159,
  946.       165,  840,   23,   23,   23,   23,   23,   23,   23,   23,
  947.       165,  841,   23,  159,  842,   23,   23,   23,   23,   23,
  948.        23,   23,   23,   23,   23,   23,   23,   23,   23,   23,
  949.        23,   23,   23,   23,   23,   23,   23,   23,   23,   23,
  950.        23,   23,   23,   23,   23,   23,   23,   23,   23,   23,
  951.        23,   23,   23,   23,   23,   23,   23,   23,   23,   23,
  952.        23,   23,   23,   23,   23,  267,  135,  267,   23,   27,
  953.  
  954.        27,  105,  844,  361,  105,  105,  135,   27,   27,   27,
  955.        27,   27,   27,   94,  285,  105,  285,  137,  348,  105,
  956.       700,  700,  437,  135,  570,  348,   97,  137,  437,  740,
  957.       740,   94,   94,   94,   27,   27,   27,   27,   27,   27,
  958.        38,   38,  361,   94,   97,   93,   97,   97,   38,   38,
  959.        38,   38,   38,   38,   93,  137,   93,   94,   38,   94,
  960.        38,  570,  845,   93,   93,   93,  846,  107,  847,  713,
  961.        97,   93,   97,  138,  713,   38,   38,   38,   38,   38,
  962.        38,  108,  136,  138,   38,  107,   38,  107,  731,   93,
  963.       848,   93,  136,  731,  849,   38,   70,   70,   96,  108,
  964.  
  965.       850,  108,  851,  107,   70,   70,   70,   70,   70,   70,
  966.        96,  107,  138,  107,  791,  136,   96,  853,   96,  854,
  967.       855,  856,  146,   96,  857,  108,  146,  108,  191,  858,
  968.       191,   70,   70,   70,   70,   70,   70,   76,   76,  146,
  969.       212,  146,   96,  212,   96,   76,   76,   76,   76,   76,
  970.        76,  791,   76,  212,  191,   76,  191,   76,  244,   76,
  971.       244,  434,  539,  434,  539,  191,   76,  276,  860,  861,
  972.       276,  862,   76,   76,   76,   76,   76,   76,  863,  260,
  973.       276,   76,  864,   76,  244,  869,  244,  434,  539,  434,
  974.       539,  870,   76,   80,   80,  873,  874,  260,   98,  260,
  975.  
  976.       875,   80,   80,   80,   80,   80,   80,  876,   80,  877,
  977.       878,   80,   80,   80,   98,   80,   98,   98,   98,   80,
  978.        98,  879,   80,  260,  880,  260,  881,  261,   80,   80,
  979.        80,   80,   80,   80,  260,  882,  883,   80,  884,   80,
  980.        90,   90,   98,  885,   98,  261,  886,  261,   90,   90,
  981.        90,   90,   90,   90,  264,  887,  888,  889,  890,  891,
  982.       892,  893,  894,  895,  896,  264,  897,  899,  408,  900,
  983.       901,  261,  264,  261,  264,   90,   90,   90,   90,   90,
  984.        90,  112,  112,  263,  408,  902,  408,  904,  408,  112,
  985.       112,  112,  112,  112,  112,  906,  907,  908,  264,  919,
  986.  
  987.       264,  263,  830,  263,  829,  827,  826,  825,  263,  824,
  988.       823,  822,  408,  821,  408,  820,  112,  112,  112,  112,
  989.       112,  112,  117,  117,  818,  817,  816,  263,  269,  263,
  990.       117,  117,  117,  117,  117,  117,  815,  814,  813,  812,
  991.       117,  269,  117,  811,  809,  290,  269,  808,  269,  807,
  992.       806,  805,  804,  803,  802,  801,  799,  117,  117,  117,
  993.       117,  117,  117,  290,  798,  290,  117,  797,  117,  119,
  994.       119,  796,  269,  795,  269,  794,  793,  119,  119,  119,
  995.       119,  119,  119,  792,  790,  789,  788,  787,  786,  290,
  996.       785,  290,  784,  783,  782,  781,  290,  780,  779,  778,
  997.  
  998.       777,  776,  775,  774,  119,  119,  119,  119,  119,  119,
  999.       123,  123,  773,  772,  771,  765,  402,  764,  123,  123,
  1000.       123,  123,  123,  123,  763,  123,  762,  761,  123,  123,
  1001.       123,  760,  123,  759,  402,  757,  402,  755,  753,  123,
  1002.       402,  751,  750,  749,  748,  123,  123,  123,  123,  123,
  1003.       123,  747,  746,  744,  123,  743,  123,  235,  235,  742,
  1004.       402,  741,  402,  739,  738,  235,  235,  235,  235,  235,
  1005.       235,  737,  736,  734,  733,  235,  728,  235,  727,  726,
  1006.       725,  724,  723,  721,  720,  719,  717,  716,  715,  710,
  1007.       708,  707,  235,  235,  235,  235,  235,  235,  706,  705,
  1008.  
  1009.       704,  235,  703,  235,  702,  698,  697,  694,  693,  690,
  1010.       689,  688,  235,  246,  246,  687,  686,  684,  681,  680,
  1011.       679,  246,  246,  246,  246,  246,  246,  678,  246,  677,
  1012.       676,  675,  673,  672,  671,  246,  670,  667,  666,  665,
  1013.       664,  663,  246,  662,  659,  656,  655,  654,  246,  246,
  1014.       246,  246,  246,  246,  653,  652,  651,  650,  649,  648,
  1015.       646,  645,  644,  637,  636,  635,  634,  630,  246,  298,
  1016.       298,  629,  627,  626,  625,  624,  622,  298,  298,  298,
  1017.       298,  298,  298,  621,  620,  619,  618,  298,  617,  298,
  1018.       616,  615,  613,  612,  608,  607,  605,  604,  603,  602,
  1019.  
  1020.       601,  599,  598,  597,  298,  298,  298,  298,  298,  298,
  1021.       596,  595,  594,  298,  593,  298,  591,  590,  589,  588,
  1022.       587,  586,  585,  584,  298,  301,  301,  583,  581,  580,
  1023.       576,  575,  574,  301,  301,  301,  301,  301,  301,  571,
  1024.       301,  569,  568,  567,  566,  565,  564,  301,  563,  561,
  1025.       559,  555,  553,  552,  301,  550,  549,  545,  542,  541,
  1026.       301,  301,  301,  301,  301,  301,  540,  538,  537,  536,
  1027.       535,  534,  533,  532,  531,  530,  529,  528,  526,  525,
  1028.       301,  435,  435,  523,  522,  521,  519,  518,  517,  435,
  1029.       435,  435,  435,  435,  435,  515,  513,  512,  511,  510,
  1030.  
  1031.       509,  507,  506,  504,  503,  502,  501,  500,  499,  498,
  1032.       497,  496,  495,  494,  493,  492,  435,  435,  435,  435,
  1033.       435,  435,  546,  546,  491,  546,  546,  490,  546,  546,
  1034.       546,  546,  546,  488,  546,  486,  485,  483,  482,  481,
  1035.       479,  546,  546,  546,  546,  546,  478,  477,  476,  474,
  1036.       472,  471,  469,  468,  467,  466,  465,  464,  463,  462,
  1037.       461,  460,  458,  457,  456,  455,  454,  453,  452,  450,
  1038.       449,  448,  447,  446,  445,  444,  443,  442,  441,  439,
  1039.       438,  436,  431,  430,  429,  428,  427,  426,  425,  424,
  1040.       423,  422,  421,  419,  418,  417,  546,  546,  546,  556,
  1041.  
  1042.       556,  416,  556,  556,  415,  556,  556,  556,  556,  556,
  1043.       413,  556,  412,  411,  410,  409,  407,  406,  556,  556,
  1044.       556,  556,  556,  405,  404,  403,  401,  400,  399,  398,
  1045.       397,  396,  395,  394,  393,  392,  391,  388,  387,  386,
  1046.       385,  384,  383,  382,  381,  380,  379,  378,  377,  376,
  1047.       375,  374,  372,  371,  370,  369,  368,  366,  365,  364,
  1048.       363,  362,  360,  359,  358,  357,  356,  355,  353,  349,
  1049.       347,  345,  343,  556,  556,  556,  632,  632,  340,  632,
  1050.       632,  339,  632,  632,  632,  632,  632,  338,  632,  335,
  1051.       329,  326,  325,  324,  323,  632,  632,  632,  632,  632,
  1052.  
  1053.       322,  321,  320,  319,  318,  317,  316,  315,  314,  313,
  1054.       312,  311,  310,  309,  308,  307,  306,  302,  299,  294,
  1055.       292,  291,  289,  288,  287,  286,  284,  283,  282,  280,
  1056.       279,  278,  277,  275,  274,  273,  272,  271,  270,  268,
  1057.       266,  265,  259,  258,  257,  256,  255,  254,  251,  248,
  1058.       632,  632,  632,  639,  639,  247,  639,  639,  241,  639,
  1059.       639,  639,  639,  639,  240,  639,  236,  231,  230,  229,
  1060.       227,  226,  639,  639,  639,  639,  639,  225,  224,  223,
  1061.       221,  220,  219,  217,  216,  215,  214,  213,  211,  210,
  1062.       209,  208,  207,  206,  204,  202,  201,  199,  196,  192,
  1063.  
  1064.       183,  174,  173,  171,  167,  160,  154,  149,  144,  142,
  1065.       141,  140,  134,  133,  132,  131,  130,  110,  109,  106,
  1066.       100,   99,   88,   84,   79,   77,   73,  639,  639,  639,
  1067.       912,  912,  912,  912,  912,  912,  912,  913,  913,  913,
  1068.       913,  913,  913,  913,  914,  914,  914,  914,  914,  915,
  1069.       915,  915,  915,  915,  915,  915,  916,  916,  916,  916,
  1070.       916,  917,  917,  917,  917,  918,  918,  918,  918,  920,
  1071.       920,  921,   71,  921,  921,  922,   65,  922,  922,  922,
  1072.       922,  922,  923,  923,  923,  923,  924,  924,  924,  924,
  1073.       925,  925,  925,  925,  926,  926,  926,  926,  927,  927,
  1074.  
  1075.       927,  927,  928,  928,  928,  928,  929,  929,  929,  929,
  1076.       930,  930,  930,  930,  931,   64,  931,  931,  931,  931,
  1077.       931,  932,   63,  932,  932,  932,  932,  932,  933,   59,
  1078.       933,  933,  933,  933,  933,  934,   53,  934,  934,  934,
  1079.       934,  934,  935,   52,  935,  935,  935,  935,  935,   43,
  1080.        39,   35,   33,   32,   26,   21,   17,  911,  911,  911,
  1081.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  1082.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  1083.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  1084.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  1085.  
  1086.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  1087.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  1088.       911,  911,  911,  911,  911,  911,  911,  911,  911,  911,
  1089.       911,  911,  911,  911,  911,  911
  1090.     } ;
  1091.  
  1092. static yy_state_type yy_last_accepting_state;
  1093. static YY_CHAR *yy_last_accepting_cpos;
  1094.  
  1095. /* the intent behind this definition is that it'll catch
  1096.  * any uses of REJECT which flex missed
  1097.  */
  1098. #define REJECT reject_used_but_not_detected
  1099. #define yymore() yymore_used_but_not_detected
  1100. #define YY_MORE_ADJ 0
  1101. # line 255 "flex.skel"
  1102.  
  1103. /* these variables are all declared out here so that section 3 code can
  1104.  * manipulate them
  1105.  */
  1106. /* points to current character in buffer */
  1107. static YY_CHAR *yy_c_buf_p = (YY_CHAR *) 0;
  1108. static int yy_init = 1;        /* whether we need to initialize */
  1109. static int yy_start = 0;    /* start state number */
  1110.  
  1111. /* flag which is used to allow yywrap()'s to do buffer switches
  1112.  * instead of setting up a fresh yyin.  A bit of a hack ...
  1113.  */
  1114. static int yy_did_buffer_switch_on_eof;
  1115.  
  1116. static yy_state_type yy_get_previous_state YY_PROTO(( void ));
  1117. static yy_state_type yy_try_NUL_trans YY_PROTO(( yy_state_type current_state ));
  1118. static int yy_get_next_buffer YY_PROTO(( void ));
  1119. static void yyunput YY_PROTO(( YY_CHAR c, YY_CHAR *buf_ptr ));
  1120. void yyrestart YY_PROTO(( FILE *input_file ));
  1121. void yy_switch_to_buffer YY_PROTO(( YY_BUFFER_STATE new_buffer ));
  1122. void yy_load_buffer_state YY_PROTO(( void ));
  1123. YY_BUFFER_STATE yy_create_buffer YY_PROTO(( FILE *file, int size ));
  1124. void yy_delete_buffer YY_PROTO(( YY_BUFFER_STATE b ));
  1125. void yy_init_buffer YY_PROTO(( YY_BUFFER_STATE b, FILE *file ));
  1126.  
  1127. #define yy_new_buffer yy_create_buffer
  1128.  
  1129. #ifdef __cplusplus
  1130. static int yyinput YY_PROTO(( void ));
  1131. #else
  1132. static int input YY_PROTO(( void ));
  1133. #endif
  1134.  
  1135. YY_DECL
  1136.     {
  1137.     register yy_state_type yy_current_state;
  1138.     register YY_CHAR *yy_cp, *yy_bp;
  1139.     register int yy_act;
  1140.  
  1141.  
  1142.  
  1143.  
  1144. # line 296 "flex.skel"
  1145.  
  1146.     if ( yy_init )
  1147.     {
  1148.     YY_USER_INIT;
  1149.  
  1150.     if ( ! yy_start )
  1151.         yy_start = 1;    /* first start state */
  1152.  
  1153.     if ( ! yyin )
  1154.         yyin = stdin;
  1155.  
  1156.     if ( ! yyout )
  1157.         yyout = stdout;
  1158.  
  1159.     if ( yy_current_buffer )
  1160.         yy_init_buffer( yy_current_buffer, yyin );
  1161.     else
  1162.         yy_current_buffer = yy_create_buffer( yyin, YY_BUF_SIZE );
  1163.  
  1164.     yy_load_buffer_state();
  1165.  
  1166.     yy_init = 0;
  1167.     }
  1168.  
  1169.     while ( 1 )        /* loops until end-of-file is reached */
  1170.     {
  1171. # line 324 "flex.skel"
  1172.     yy_cp = yy_c_buf_p;
  1173.  
  1174.     /* support of yytext */
  1175.     *yy_cp = yy_hold_char;
  1176.  
  1177.     /* yy_bp points to the position in yy_ch_buf of the start of the
  1178.      * current run.
  1179.      */
  1180.     yy_bp = yy_cp;
  1181.  
  1182.     yy_current_state = yy_start;
  1183. yy_match:
  1184.     do
  1185.         {
  1186.         register YY_CHAR yy_c = yy_ec[*yy_cp];
  1187.         if ( yy_accept[yy_current_state] )
  1188.         {
  1189.         yy_last_accepting_state = yy_current_state;
  1190.         yy_last_accepting_cpos = yy_cp;
  1191.         }
  1192.         while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
  1193.         {
  1194.         yy_current_state = yy_def[yy_current_state];
  1195.         if ( yy_current_state >= 912 )
  1196.             yy_c = yy_meta[yy_c];
  1197.         }
  1198.         yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
  1199.         ++yy_cp;
  1200.         }
  1201.     while ( yy_base[yy_current_state] != 1758 );
  1202. # line 336 "flex.skel"
  1203.  
  1204. yy_find_action:
  1205.     yy_act = yy_accept[yy_current_state];
  1206. # line 340 "flex.skel"
  1207.  
  1208.     YY_DO_BEFORE_ACTION;
  1209.     YY_USER_ACTION;
  1210.  
  1211. do_action:    /* this label is used only to access EOF actions */
  1212.  
  1213. # line 348 "flex.skel"
  1214.  
  1215.     switch ( yy_act )
  1216.         {
  1217.         case 0: /* must backtrack */
  1218.         /* undo the effects of YY_DO_BEFORE_ACTION */
  1219.         *yy_cp = yy_hold_char;
  1220.         yy_cp = yy_last_accepting_cpos;
  1221.         yy_current_state = yy_last_accepting_state;
  1222.         goto yy_find_action;
  1223.  
  1224. case 1:
  1225. # line 93 "./ldlex.l"
  1226. { comment(); }
  1227.     YY_BREAK
  1228. case 2:
  1229. # line 96 "./ldlex.l"
  1230. { RTOKEN('-');}
  1231.     YY_BREAK
  1232. case 3:
  1233. # line 97 "./ldlex.l"
  1234. { RTOKEN('+');}
  1235.     YY_BREAK
  1236. case 4:
  1237. # line 98 "./ldlex.l"
  1238. { yylval.name = buystring(yytext); return NAME; }
  1239.     YY_BREAK
  1240. case 5:
  1241. # line 99 "./ldlex.l"
  1242. { RTOKEN(DEFSYMEND); }
  1243.     YY_BREAK
  1244. case 6:
  1245. # line 100 "./ldlex.l"
  1246. { RTOKEN('='); }
  1247.     YY_BREAK
  1248. case 7:
  1249. # line 101 "./ldlex.l"
  1250. { return OPTION_defsym; }
  1251.     YY_BREAK
  1252. case 8:
  1253. # line 102 "./ldlex.l"
  1254. { return OPTION_noinhibit_exec; }
  1255.     YY_BREAK
  1256. case 9:
  1257. # line 103 "./ldlex.l"
  1258. { return OPTION_noinhibit_exec; }
  1259.     YY_BREAK
  1260. case 10:
  1261. # line 104 "./ldlex.l"
  1262. { return OPTION_sort_common;}
  1263.     YY_BREAK
  1264. case 11:
  1265. # line 105 "./ldlex.l"
  1266. { return OPTION_sort_common;}
  1267.     YY_BREAK
  1268. case 12:
  1269. # line 106 "./ldlex.l"
  1270. { return OPTION_format; }
  1271.     YY_BREAK
  1272. case 13:
  1273. # line 107 "./ldlex.l"
  1274. { return OPTION_n; }
  1275.     YY_BREAK
  1276. case 14:
  1277. # line 108 "./ldlex.l"
  1278. { return OPTION_N; }
  1279.     YY_BREAK
  1280. case 15:
  1281. # line 109 "./ldlex.l"
  1282. { return OPTION_r; }
  1283.     YY_BREAK
  1284. case 16:
  1285. # line 110 "./ldlex.l"
  1286. { return OPTION_relax; }
  1287.     YY_BREAK
  1288. case 17:
  1289. # line 111 "./ldlex.l"
  1290. { return OPTION_r; }
  1291.     YY_BREAK
  1292. case 18:
  1293. # line 112 "./ldlex.l"
  1294. { return OPTION_Ur; }
  1295.     YY_BREAK
  1296. case 19:
  1297. # line 113 "./ldlex.l"
  1298. { return OPTION_o; }
  1299.     YY_BREAK
  1300. case 20:
  1301. # line 114 "./ldlex.l"
  1302. { return OPTION_g; }
  1303.     YY_BREAK
  1304. case 21:
  1305. # line 115 "./ldlex.l"
  1306. { return OPTION_e; }
  1307.     YY_BREAK
  1308. case 22:
  1309. # line 116 "./ldlex.l"
  1310. { return OPTION_b; }
  1311.     YY_BREAK
  1312. case 23:
  1313. # line 117 "./ldlex.l"
  1314. { return OPTION_dc; }
  1315.     YY_BREAK
  1316. case 24:
  1317. # line 118 "./ldlex.l"
  1318. { return OPTION_dp; }
  1319.     YY_BREAK
  1320. case 25:
  1321. # line 119 "./ldlex.l"
  1322. { return OPTION_d; }
  1323.     YY_BREAK
  1324. case 26:
  1325. # line 120 "./ldlex.l"
  1326. { return OPTION_v; }
  1327.     YY_BREAK
  1328. case 27:
  1329. # line 121 "./ldlex.l"
  1330. { return OPTION_V; }
  1331.     YY_BREAK
  1332. case 28:
  1333. # line 122 "./ldlex.l"
  1334. { return OPTION_M; }
  1335.     YY_BREAK
  1336. case 29:
  1337. # line 123 "./ldlex.l"
  1338. { return OPTION_Map;}
  1339.     YY_BREAK
  1340. case 30:
  1341. # line 124 "./ldlex.l"
  1342. { return OPTION_t; }
  1343.     YY_BREAK
  1344. case 31:
  1345. # line 125 "./ldlex.l"
  1346. { return OPTION_X; }
  1347.     YY_BREAK
  1348. case 32:
  1349. # line 126 "./ldlex.l"
  1350. { return OPTION_x; }
  1351.     YY_BREAK
  1352. case 33:
  1353. # line 127 "./ldlex.l"
  1354. { return OPTION_c; }
  1355.     YY_BREAK
  1356. case 34:
  1357. # line 128 "./ldlex.l"
  1358. { return OPTION_R; }
  1359.     YY_BREAK
  1360. case 35:
  1361. # line 129 "./ldlex.l"
  1362. { return OPTION_u; }
  1363.     YY_BREAK
  1364. case 36:
  1365. # line 130 "./ldlex.l"
  1366. { return OPTION_s; }
  1367.     YY_BREAK
  1368. case 37:
  1369. # line 131 "./ldlex.l"
  1370. { return OPTION_S; }
  1371.     YY_BREAK
  1372. case 38:
  1373. # line 132 "./ldlex.l"
  1374. { return OPTION_Bstatic; }
  1375.     YY_BREAK
  1376. case 39:
  1377. # line 133 "./ldlex.l"
  1378. { /* Ignored */ }
  1379.     YY_BREAK
  1380. case 40:
  1381. # line 134 "./ldlex.l"
  1382. {
  1383.                      yylval.name = buystring(yytext+2);
  1384.                       return OPTION_l; 
  1385.                 }
  1386.     YY_BREAK
  1387. case 41:
  1388. # line 139 "./ldlex.l"
  1389. { 
  1390.                     yylval.name = buystring(yytext+2);
  1391.                     return OPTION_L; 
  1392.                 }
  1393.     YY_BREAK
  1394. case 42:
  1395. # line 143 "./ldlex.l"
  1396. {
  1397.                  yylval.name = ".text";
  1398.                  return OPTION_Texp;
  1399.                 }
  1400.     YY_BREAK
  1401. case 43:
  1402. # line 147 "./ldlex.l"
  1403. {
  1404.                  yylval.name = ".data";
  1405.                  return OPTION_Texp;
  1406.                    }
  1407.     YY_BREAK
  1408. case 44:
  1409. # line 151 "./ldlex.l"
  1410. {
  1411.                  yylval.name = ".bss";
  1412.                  return OPTION_Texp;
  1413.                    }
  1414.     YY_BREAK
  1415. case 45:
  1416. # line 155 "./ldlex.l"
  1417. {
  1418.                 yylval.name = buystring(yytext+2);
  1419.                 return OPTION_Texp;
  1420.                 }
  1421.     YY_BREAK
  1422. case 46:
  1423. # line 160 "./ldlex.l"
  1424. {
  1425.                  yylval.name = buystring(yytext+2);
  1426.                  return OPTION_Tfile;
  1427.                    }
  1428.     YY_BREAK
  1429. case 47:
  1430. # line 164 "./ldlex.l"
  1431. {
  1432.                  return OPTION_T;
  1433.                    }
  1434.     YY_BREAK
  1435. case 48:
  1436. # line 168 "./ldlex.l"
  1437. {
  1438.                  return OPTION_F;
  1439.                    }
  1440.     YY_BREAK
  1441. case 49:
  1442. # line 171 "./ldlex.l"
  1443. {
  1444.                  return OPTION_F;
  1445.                    }
  1446.     YY_BREAK
  1447. case 50:
  1448. # line 175 "./ldlex.l"
  1449. {
  1450.                     yylval.name = buystring(yytext+2);
  1451.                     return OPTION_y;
  1452.                 }
  1453.     YY_BREAK
  1454. case 51:
  1455. # line 180 "./ldlex.l"
  1456. {
  1457.                             yylval.name = buystring(yytext+2);
  1458.                      return OPTION_Aarch;
  1459.                        }
  1460.     YY_BREAK
  1461. case 52:
  1462. # line 185 "./ldlex.l"
  1463. { return OPTION_RETAIN_SYMBOLS_FILE; }
  1464.     YY_BREAK
  1465. case 53:
  1466. # line 187 "./ldlex.l"
  1467. {
  1468.                     return OPTION_EB;
  1469.                 }
  1470.     YY_BREAK
  1471. case 54:
  1472. # line 190 "./ldlex.l"
  1473. {
  1474.                     return OPTION_EL;
  1475.                 }
  1476.     YY_BREAK
  1477. case 55:
  1478. # line 193 "./ldlex.l"
  1479. {
  1480.                     return OPTION_G;
  1481.                 }
  1482.     YY_BREAK
  1483. case 56:
  1484. # line 196 "./ldlex.l"
  1485. {
  1486.                     yylval.integer = atoi (yytext + 2);
  1487.                     return OPTION_Gval;
  1488.                 }
  1489.     YY_BREAK
  1490. case 57:
  1491. # line 200 "./ldlex.l"
  1492. {
  1493.                   yylval.integer = strtoul(yytext+1, 0,16);
  1494.                 return INT;
  1495.             }
  1496.     YY_BREAK
  1497. case 58:
  1498. # line 205 "./ldlex.l"
  1499. {
  1500.                    int base ;
  1501.                    switch (yytext[yyleng-1]) {
  1502.                     case 'X': 
  1503.                     case 'H':
  1504.                      base = 16;
  1505.                      break;
  1506.                     case 'O':
  1507.                      base = 8;
  1508.                      break;
  1509.                     case 'B':
  1510.                      base = 2;
  1511.                      break;
  1512.                     default:
  1513.                      base = 10;
  1514.                    }
  1515.                    yylval.integer = strtoul(yytext+1, 0, base);    
  1516.                    return INT;
  1517.                  }
  1518.     YY_BREAK
  1519. case 59:
  1520. # line 224 "./ldlex.l"
  1521. {
  1522.                   yylval.integer = strtoul(yytext,0,hex_mode);
  1523.                   if (yytext[yyleng-1]=='M'
  1524.                     || yytext[yyleng-1] == 'm') {
  1525.                       yylval.integer *= 1024*1024;
  1526.                     }    
  1527.                   if (yytext[yyleng-1]=='K' 
  1528.                 || yytext[yyleng-1]=='k') {
  1529.                       yylval.integer *= 1024;
  1530.                     }        
  1531.                   return INT;
  1532.                 }
  1533.     YY_BREAK
  1534. case 60:
  1535. # line 236 "./ldlex.l"
  1536. { RTOKEN(']');}
  1537.     YY_BREAK
  1538. case 61:
  1539. # line 237 "./ldlex.l"
  1540. { RTOKEN('[');}
  1541.     YY_BREAK
  1542. case 62:
  1543. # line 238 "./ldlex.l"
  1544. { RTOKEN(LSHIFTEQ);}
  1545.     YY_BREAK
  1546. case 63:
  1547. # line 239 "./ldlex.l"
  1548. { RTOKEN(RSHIFTEQ);}
  1549.     YY_BREAK
  1550. case 64:
  1551. # line 240 "./ldlex.l"
  1552. { RTOKEN(OROR);}
  1553.     YY_BREAK
  1554. case 65:
  1555. # line 241 "./ldlex.l"
  1556. { RTOKEN(EQ);}
  1557.     YY_BREAK
  1558. case 66:
  1559. # line 242 "./ldlex.l"
  1560. { RTOKEN(NE);}
  1561.     YY_BREAK
  1562. case 67:
  1563. # line 243 "./ldlex.l"
  1564. { RTOKEN(GE);}
  1565.     YY_BREAK
  1566. case 68:
  1567. # line 244 "./ldlex.l"
  1568. { RTOKEN(LE);}
  1569.     YY_BREAK
  1570. case 69:
  1571. # line 245 "./ldlex.l"
  1572. { RTOKEN(LSHIFT);}
  1573.     YY_BREAK
  1574. case 70:
  1575. # line 246 "./ldlex.l"
  1576. { RTOKEN(RSHIFT);}
  1577.     YY_BREAK
  1578. case 71:
  1579. # line 247 "./ldlex.l"
  1580. { RTOKEN(PLUSEQ);}
  1581.     YY_BREAK
  1582. case 72:
  1583. # line 248 "./ldlex.l"
  1584. { RTOKEN(MINUSEQ);}
  1585.     YY_BREAK
  1586. case 73:
  1587. # line 249 "./ldlex.l"
  1588. { RTOKEN(MULTEQ);}
  1589.     YY_BREAK
  1590. case 74:
  1591. # line 250 "./ldlex.l"
  1592. { RTOKEN(DIVEQ);}
  1593.     YY_BREAK
  1594. case 75:
  1595. # line 251 "./ldlex.l"
  1596. { RTOKEN(ANDEQ);}
  1597.     YY_BREAK
  1598. case 76:
  1599. # line 252 "./ldlex.l"
  1600. { RTOKEN(OREQ);}
  1601.     YY_BREAK
  1602. case 77:
  1603. # line 253 "./ldlex.l"
  1604. { RTOKEN(ANDAND);}
  1605.     YY_BREAK
  1606. case 78:
  1607. # line 254 "./ldlex.l"
  1608. { RTOKEN('>');}
  1609.     YY_BREAK
  1610. case 79:
  1611. # line 255 "./ldlex.l"
  1612. { RTOKEN(',');}
  1613.     YY_BREAK
  1614. case 80:
  1615. # line 256 "./ldlex.l"
  1616. { RTOKEN('&');}
  1617.     YY_BREAK
  1618. case 81:
  1619. # line 257 "./ldlex.l"
  1620. { RTOKEN('|');}
  1621.     YY_BREAK
  1622. case 82:
  1623. # line 258 "./ldlex.l"
  1624. { RTOKEN('~');}
  1625.     YY_BREAK
  1626. case 83:
  1627. # line 259 "./ldlex.l"
  1628. { RTOKEN('!');}
  1629.     YY_BREAK
  1630. case 84:
  1631. # line 260 "./ldlex.l"
  1632. { RTOKEN('?');}
  1633.     YY_BREAK
  1634. case 85:
  1635. # line 261 "./ldlex.l"
  1636. { RTOKEN('*');}
  1637.     YY_BREAK
  1638. case 86:
  1639. # line 262 "./ldlex.l"
  1640. { RTOKEN('+');}
  1641.     YY_BREAK
  1642. case 87:
  1643. # line 263 "./ldlex.l"
  1644. { RTOKEN('-');}
  1645.     YY_BREAK
  1646. case 88:
  1647. # line 264 "./ldlex.l"
  1648. { RTOKEN('/');}
  1649.     YY_BREAK
  1650. case 89:
  1651. # line 265 "./ldlex.l"
  1652. { RTOKEN('%');}
  1653.     YY_BREAK
  1654. case 90:
  1655. # line 266 "./ldlex.l"
  1656. { RTOKEN('<');}
  1657.     YY_BREAK
  1658. case 91:
  1659. # line 267 "./ldlex.l"
  1660. { RTOKEN('>');}
  1661.     YY_BREAK
  1662. case 92:
  1663. # line 268 "./ldlex.l"
  1664. { RTOKEN('=');}
  1665.     YY_BREAK
  1666. case 93:
  1667. # line 269 "./ldlex.l"
  1668. { RTOKEN('}') ; }
  1669.     YY_BREAK
  1670. case 94:
  1671. # line 270 "./ldlex.l"
  1672. { RTOKEN('{'); }
  1673.     YY_BREAK
  1674. case 95:
  1675. # line 271 "./ldlex.l"
  1676. { RTOKEN(')');}
  1677.     YY_BREAK
  1678. case 96:
  1679. # line 272 "./ldlex.l"
  1680. { RTOKEN('(');}
  1681.     YY_BREAK
  1682. case 97:
  1683. # line 273 "./ldlex.l"
  1684. { RTOKEN(']');}
  1685.     YY_BREAK
  1686. case 98:
  1687. # line 274 "./ldlex.l"
  1688. { RTOKEN('[');}
  1689.     YY_BREAK
  1690. case 99:
  1691. # line 275 "./ldlex.l"
  1692. { RTOKEN(':'); }
  1693.     YY_BREAK
  1694. case 100:
  1695. # line 276 "./ldlex.l"
  1696. { RTOKEN(';');}
  1697.     YY_BREAK
  1698. case 101:
  1699. # line 277 "./ldlex.l"
  1700. { RTOKEN('-');}
  1701.     YY_BREAK
  1702. case 102:
  1703. # line 278 "./ldlex.l"
  1704. { RTOKEN('/');}
  1705.     YY_BREAK
  1706. case 103:
  1707. # line 279 "./ldlex.l"
  1708. { RTOKEN(MEMORY);}
  1709.     YY_BREAK
  1710. case 104:
  1711. # line 280 "./ldlex.l"
  1712. { RTOKEN(ORIGIN);}
  1713.     YY_BREAK
  1714. case 105:
  1715. # line 281 "./ldlex.l"
  1716. { RTOKEN(BLOCK);}
  1717.     YY_BREAK
  1718. case 106:
  1719. # line 282 "./ldlex.l"
  1720. { RTOKEN(LENGTH);}
  1721.     YY_BREAK
  1722. case 107:
  1723. # line 283 "./ldlex.l"
  1724. { RTOKEN(ALIGN_K);}
  1725.     YY_BREAK
  1726. case 108:
  1727. # line 284 "./ldlex.l"
  1728. { RTOKEN(ADDR);}
  1729.     YY_BREAK
  1730. case 109:
  1731. # line 285 "./ldlex.l"
  1732. { RTOKEN(ENTRY);}
  1733.     YY_BREAK
  1734. case 110:
  1735. # line 286 "./ldlex.l"
  1736. { RTOKEN(NEXT);}
  1737.     YY_BREAK
  1738. case 111:
  1739. # line 287 "./ldlex.l"
  1740. { RTOKEN(SIZEOF_HEADERS);}
  1741.     YY_BREAK
  1742. case 112:
  1743. # line 288 "./ldlex.l"
  1744. { RTOKEN(SIZEOF_HEADERS);}
  1745.     YY_BREAK
  1746. case 113:
  1747. # line 289 "./ldlex.l"
  1748. { RTOKEN(MAP);}
  1749.     YY_BREAK
  1750. case 114:
  1751. # line 290 "./ldlex.l"
  1752. { RTOKEN(SIZEOF);}
  1753.     YY_BREAK
  1754. case 115:
  1755. # line 291 "./ldlex.l"
  1756. { RTOKEN(TARGET_K);}
  1757.     YY_BREAK
  1758. case 116:
  1759. # line 292 "./ldlex.l"
  1760. { RTOKEN(SEARCH_DIR);}
  1761.     YY_BREAK
  1762. case 117:
  1763. # line 293 "./ldlex.l"
  1764. { RTOKEN(OUTPUT);}
  1765.     YY_BREAK
  1766. case 118:
  1767. # line 294 "./ldlex.l"
  1768. { RTOKEN(INPUT);}
  1769.     YY_BREAK
  1770. case 119:
  1771. # line 295 "./ldlex.l"
  1772. { RTOKEN(DEFINED);}
  1773.     YY_BREAK
  1774. case 120:
  1775. # line 296 "./ldlex.l"
  1776. { RTOKEN(CREATE_OBJECT_SYMBOLS);}
  1777.     YY_BREAK
  1778. case 121:
  1779. # line 297 "./ldlex.l"
  1780. { RTOKEN( CONSTRUCTORS);}
  1781.     YY_BREAK
  1782. case 122:
  1783. # line 298 "./ldlex.l"
  1784. { RTOKEN(FORCE_COMMON_ALLOCATION);}
  1785.     YY_BREAK
  1786. case 123:
  1787. # line 299 "./ldlex.l"
  1788. { RTOKEN(SECTIONS);}
  1789.     YY_BREAK
  1790. case 124:
  1791. # line 300 "./ldlex.l"
  1792. { RTOKEN(FILL);}
  1793.     YY_BREAK
  1794. case 125:
  1795. # line 301 "./ldlex.l"
  1796. { RTOKEN(STARTUP);}
  1797.     YY_BREAK
  1798. case 126:
  1799. # line 302 "./ldlex.l"
  1800. { RTOKEN(OUTPUT_FORMAT);}
  1801.     YY_BREAK
  1802. case 127:
  1803. # line 303 "./ldlex.l"
  1804. { RTOKEN( OUTPUT_ARCH);}
  1805.     YY_BREAK
  1806. case 128:
  1807. # line 304 "./ldlex.l"
  1808. { RTOKEN(HLL);}
  1809.     YY_BREAK
  1810. case 129:
  1811. # line 305 "./ldlex.l"
  1812. { RTOKEN(SYSLIB);}
  1813.     YY_BREAK
  1814. case 130:
  1815. # line 306 "./ldlex.l"
  1816. { RTOKEN(FLOAT);}
  1817.     YY_BREAK
  1818. case 131:
  1819. # line 307 "./ldlex.l"
  1820. { RTOKEN( LONG);}
  1821.     YY_BREAK
  1822. case 132:
  1823. # line 308 "./ldlex.l"
  1824. { RTOKEN( SHORT);}
  1825.     YY_BREAK
  1826. case 133:
  1827. # line 309 "./ldlex.l"
  1828. { RTOKEN( BYTE);}
  1829.     YY_BREAK
  1830. case 134:
  1831. # line 310 "./ldlex.l"
  1832. { RTOKEN(NOFLOAT);}
  1833.     YY_BREAK
  1834. case 135:
  1835. # line 311 "./ldlex.l"
  1836. { RTOKEN(NOLOAD);}
  1837.     YY_BREAK
  1838. case 136:
  1839. # line 312 "./ldlex.l"
  1840. { RTOKEN(DSECT);}
  1841.     YY_BREAK
  1842. case 137:
  1843. # line 313 "./ldlex.l"
  1844. { RTOKEN(COPY);}
  1845.     YY_BREAK
  1846. case 138:
  1847. # line 314 "./ldlex.l"
  1848. { RTOKEN(INFO);}
  1849.     YY_BREAK
  1850. case 139:
  1851. # line 315 "./ldlex.l"
  1852. { RTOKEN(OVERLAY);}
  1853.     YY_BREAK
  1854. case 140:
  1855. # line 316 "./ldlex.l"
  1856. { RTOKEN(ORIGIN);}
  1857.     YY_BREAK
  1858. case 141:
  1859. # line 317 "./ldlex.l"
  1860. { RTOKEN(ORIGIN);}
  1861.     YY_BREAK
  1862. case 142:
  1863. # line 318 "./ldlex.l"
  1864. { RTOKEN( LENGTH);}
  1865.     YY_BREAK
  1866. case 143:
  1867. # line 319 "./ldlex.l"
  1868. { RTOKEN( LENGTH);}
  1869.     YY_BREAK
  1870. case 144:
  1871. # line 320 "./ldlex.l"
  1872. { RTOKEN(INCLUDE);}
  1873.     YY_BREAK
  1874. case 145:
  1875. # line 321 "./ldlex.l"
  1876. { RTOKEN(AT);}
  1877.     YY_BREAK
  1878. case 146:
  1879. # line 322 "./ldlex.l"
  1880. { ++ lineno;  RTOKEN(NEWLINE); }
  1881.     YY_BREAK
  1882. case 147:
  1883. # line 323 "./ldlex.l"
  1884. { /* Mri comment line */ }
  1885.     YY_BREAK
  1886. case 148:
  1887. # line 324 "./ldlex.l"
  1888. { RTOKEN(ENDWORD); }
  1889.     YY_BREAK
  1890. case 149:
  1891. # line 325 "./ldlex.l"
  1892. { RTOKEN(ALIGNMOD);}
  1893.     YY_BREAK
  1894. case 150:
  1895. # line 326 "./ldlex.l"
  1896. { RTOKEN(ALIGN_K);}
  1897.     YY_BREAK
  1898. case 151:
  1899. # line 328 "./ldlex.l"
  1900. { RTOKEN(CHIP); }
  1901.     YY_BREAK
  1902. case 152:
  1903. # line 329 "./ldlex.l"
  1904. { RTOKEN(BASE); }
  1905.     YY_BREAK
  1906. case 153:
  1907. # line 330 "./ldlex.l"
  1908. { RTOKEN(ALIAS); }
  1909.     YY_BREAK
  1910. case 154:
  1911. # line 331 "./ldlex.l"
  1912. { RTOKEN(TRUNCATE); }
  1913.     YY_BREAK
  1914. case 155:
  1915. # line 332 "./ldlex.l"
  1916. { RTOKEN(LOAD); }
  1917.     YY_BREAK
  1918. case 156:
  1919. # line 333 "./ldlex.l"
  1920. { RTOKEN(PUBLIC); }
  1921.     YY_BREAK
  1922. case 157:
  1923. # line 334 "./ldlex.l"
  1924. { RTOKEN(ORDER); }
  1925.     YY_BREAK
  1926. case 158:
  1927. # line 335 "./ldlex.l"
  1928. { RTOKEN(NAMEWORD); }
  1929.     YY_BREAK
  1930. case 159:
  1931. # line 336 "./ldlex.l"
  1932. { RTOKEN(FORMAT); }
  1933.     YY_BREAK
  1934. case 160:
  1935. # line 337 "./ldlex.l"
  1936. { RTOKEN(LIST); /* LIST and ignore to end of line */ }
  1937.     YY_BREAK
  1938. case 161:
  1939. # line 338 "./ldlex.l"
  1940. { RTOKEN(SECT); }
  1941.     YY_BREAK
  1942. case 162:
  1943. # line 339 "./ldlex.l"
  1944. { RTOKEN(ABSOLUTE); }
  1945.     YY_BREAK
  1946. case 163:
  1947. # line 340 "./ldlex.l"
  1948. { RTOKEN(ENDWORD); }
  1949.     YY_BREAK
  1950. case 164:
  1951. # line 341 "./ldlex.l"
  1952. { RTOKEN(CHIP); }
  1953.     YY_BREAK
  1954. case 165:
  1955. # line 342 "./ldlex.l"
  1956. { RTOKEN(LOAD); }
  1957.     YY_BREAK
  1958. case 166:
  1959. # line 343 "./ldlex.l"
  1960. { RTOKEN(ORDER); }
  1961.     YY_BREAK
  1962. case 167:
  1963. # line 344 "./ldlex.l"
  1964. { RTOKEN(NAMEWORD); }
  1965.     YY_BREAK
  1966. case 168:
  1967. # line 345 "./ldlex.l"
  1968. { RTOKEN(FORMAT); }
  1969.     YY_BREAK
  1970. case 169:
  1971. # line 346 "./ldlex.l"
  1972. { RTOKEN(LIST); /* LIST and ignore to end of line */ }
  1973.     YY_BREAK
  1974. case 170:
  1975. # line 347 "./ldlex.l"
  1976. { RTOKEN(SECT); }
  1977.     YY_BREAK
  1978. case 171:
  1979. # line 348 "./ldlex.l"
  1980. { RTOKEN(ABSOLUTE); }
  1981.     YY_BREAK
  1982. case 172:
  1983. # line 350 "./ldlex.l"
  1984. {
  1985.                  yylval.name = buystring(yytext); 
  1986.                   return NAME;
  1987.                 }
  1988.     YY_BREAK
  1989. case 173:
  1990. # line 356 "./ldlex.l"
  1991. {
  1992. /* Filename without commas, needed to parse mri stuff */
  1993.                  yylval.name = buystring(yytext); 
  1994.                   return NAME;
  1995.                 }
  1996.     YY_BREAK
  1997. case 174:
  1998. # line 363 "./ldlex.l"
  1999. {
  2000.                  yylval.name = buystring(yytext); 
  2001.                   return NAME;
  2002.                 }
  2003.     YY_BREAK
  2004. case 175:
  2005. # line 367 "./ldlex.l"
  2006. { yylval.name = buystring(yytext); 
  2007.                   return NAME;
  2008.                 }
  2009.     YY_BREAK
  2010. case 176:
  2011. # line 371 "./ldlex.l"
  2012. {
  2013.                     /* No matter the state, quotes
  2014.                        give what's inside */
  2015.                     yylval.name = buystring(yytext+1);
  2016.                     yylval.name[yyleng-2] = 0;
  2017.                     return NAME;
  2018.                 }
  2019.     YY_BREAK
  2020. case 177:
  2021. # line 378 "./ldlex.l"
  2022. { lineno++;}
  2023.     YY_BREAK
  2024. case 178:
  2025. # line 379 "./ldlex.l"
  2026.  
  2027.     YY_BREAK
  2028. case YY_STATE_EOF(INITIAL):
  2029. case YY_STATE_EOF(COMMAND):
  2030. case YY_STATE_EOF(SCRIPT):
  2031. case YY_STATE_EOF(EXPRESSION):
  2032. case YY_STATE_EOF(COMMENT):
  2033. case YY_STATE_EOF(BOTH):
  2034. case YY_STATE_EOF(DEFSYMEXP):
  2035. case YY_STATE_EOF(MRI):
  2036. # line 381 "./ldlex.l"
  2037. {
  2038.   extern char *ldfile_input_filename;
  2039.   include_stack_ptr--;
  2040.     
  2041.   if (include_stack_ptr == 0) 
  2042.   {
  2043.     yyterminate();
  2044.   }
  2045.   else 
  2046.   {
  2047.     yy_switch_to_buffer(include_stack[include_stack_ptr]);
  2048.  
  2049.   }
  2050.   if (include_stack_ptr==1) 
  2051.   {
  2052.     BEGIN(COMMAND);
  2053.   }
  2054.   else 
  2055.   {
  2056.     BEGIN(SCRIPT);
  2057.     ldfile_input_filename = file_name_stack[include_stack_ptr-1];
  2058.   }
  2059.  
  2060.   return END;
  2061. }
  2062.     YY_BREAK
  2063. case 180:
  2064. # line 407 "./ldlex.l"
  2065. ECHO;
  2066.     YY_BREAK
  2067. # line 353 "flex.skel"
  2068.  
  2069.         case YY_END_OF_BUFFER:
  2070.         {
  2071.         /* amount of text matched not including the EOB char */
  2072.         int yy_amount_of_matched_text = yy_cp - yytext - 1;
  2073.  
  2074.         /* undo the effects of YY_DO_BEFORE_ACTION */
  2075.         *yy_cp = yy_hold_char;
  2076.  
  2077.         /* note that here we test for yy_c_buf_p "<=" to the position
  2078.          * of the first EOB in the buffer, since yy_c_buf_p will
  2079.          * already have been incremented past the NUL character
  2080.          * (since all states make transitions on EOB to the end-
  2081.          * of-buffer state).  Contrast this with the test in yyinput().
  2082.          */
  2083.         if ( yy_c_buf_p <= &yy_current_buffer->yy_ch_buf[yy_n_chars] )
  2084.             /* this was really a NUL */
  2085.             {
  2086.             yy_state_type yy_next_state;
  2087.  
  2088.             yy_c_buf_p = yytext + yy_amount_of_matched_text;
  2089.  
  2090.             yy_current_state = yy_get_previous_state();
  2091.  
  2092.             /* okay, we're now positioned to make the
  2093.              * NUL transition.  We couldn't have
  2094.              * yy_get_previous_state() go ahead and do it
  2095.              * for us because it doesn't know how to deal
  2096.              * with the possibility of jamming (and we
  2097.              * don't want to build jamming into it because
  2098.              * then it will run more slowly)
  2099.              */
  2100.  
  2101.             yy_next_state = yy_try_NUL_trans( yy_current_state );
  2102.  
  2103.             yy_bp = yytext + YY_MORE_ADJ;
  2104.  
  2105.             if ( yy_next_state )
  2106.             {
  2107.             /* consume the NUL */
  2108.             yy_cp = ++yy_c_buf_p;
  2109.             yy_current_state = yy_next_state;
  2110.             goto yy_match;
  2111.             }
  2112.  
  2113.             else
  2114.             {
  2115. # line 402 "flex.skel"
  2116.             goto yy_find_action;
  2117.             }
  2118.             }
  2119.  
  2120.         else switch ( yy_get_next_buffer() )
  2121.             {
  2122.             case EOB_ACT_END_OF_FILE:
  2123.             {
  2124.             yy_did_buffer_switch_on_eof = 0;
  2125.  
  2126.             if ( yywrap() )
  2127.                 {
  2128.                 /* note: because we've taken care in
  2129.                  * yy_get_next_buffer() to have set up yytext,
  2130.                  * we can now set up yy_c_buf_p so that if some
  2131.                  * total hoser (like flex itself) wants
  2132.                  * to call the scanner after we return the
  2133.                  * YY_NULL, it'll still work - another YY_NULL
  2134.                  * will get returned.
  2135.                  */
  2136.                 yy_c_buf_p = yytext + YY_MORE_ADJ;
  2137.  
  2138.                 yy_act = YY_STATE_EOF((yy_start - 1) / 2);
  2139.                 goto do_action;
  2140.                 }
  2141.  
  2142.             else
  2143.                 {
  2144.                 if ( ! yy_did_buffer_switch_on_eof )
  2145.                 YY_NEW_FILE;
  2146.                 }
  2147.             }
  2148.             break;
  2149.  
  2150.             case EOB_ACT_CONTINUE_SCAN:
  2151.             yy_c_buf_p = yytext + yy_amount_of_matched_text;
  2152.  
  2153.             yy_current_state = yy_get_previous_state();
  2154.  
  2155.             yy_cp = yy_c_buf_p;
  2156.             yy_bp = yytext + YY_MORE_ADJ;
  2157.             goto yy_match;
  2158.  
  2159.             case EOB_ACT_LAST_MATCH:
  2160.             yy_c_buf_p =
  2161.                 &yy_current_buffer->yy_ch_buf[yy_n_chars];
  2162.  
  2163.             yy_current_state = yy_get_previous_state();
  2164.  
  2165.             yy_cp = yy_c_buf_p;
  2166.             yy_bp = yytext + YY_MORE_ADJ;
  2167.             goto yy_find_action;
  2168.             }
  2169.         break;
  2170.         }
  2171.  
  2172.         default:
  2173. #ifdef FLEX_DEBUG
  2174.         printf( "action # %d\n", yy_act );
  2175. #endif
  2176.         YY_FATAL_ERROR(
  2177.             "fatal flex scanner internal error--no action found" );
  2178.         }
  2179.     }
  2180.     }
  2181.  
  2182.  
  2183. /* yy_get_next_buffer - try to read in a new buffer
  2184.  *
  2185.  * synopsis
  2186.  *     int yy_get_next_buffer();
  2187.  *     
  2188.  * returns a code representing an action
  2189.  *     EOB_ACT_LAST_MATCH - 
  2190.  *     EOB_ACT_CONTINUE_SCAN - continue scanning from current position
  2191.  *     EOB_ACT_END_OF_FILE - end of file
  2192.  */
  2193.  
  2194. static int yy_get_next_buffer()
  2195.  
  2196.     {
  2197.     register YY_CHAR *dest = yy_current_buffer->yy_ch_buf;
  2198.     register YY_CHAR *source = yytext - 1; /* copy prev. char, too */
  2199.     register int number_to_move, i;
  2200.     int ret_val;
  2201.  
  2202.     if ( yy_c_buf_p > &yy_current_buffer->yy_ch_buf[yy_n_chars + 1] )
  2203.     YY_FATAL_ERROR(
  2204.         "fatal flex scanner internal error--end of buffer missed" );
  2205.  
  2206.     /* try to read more data */
  2207.  
  2208.     /* first move last chars to start of buffer */
  2209.     number_to_move = yy_c_buf_p - yytext;
  2210.  
  2211.     for ( i = 0; i < number_to_move; ++i )
  2212.     *(dest++) = *(source++);
  2213.  
  2214.     if ( yy_current_buffer->yy_eof_status != EOF_NOT_SEEN )
  2215.     /* don't do the read, it's not guaranteed to return an EOF,
  2216.      * just force an EOF
  2217.      */
  2218.     yy_n_chars = 0;
  2219.  
  2220.     else
  2221.     {
  2222.     int num_to_read = yy_current_buffer->yy_buf_size - number_to_move - 1;
  2223.  
  2224.     if ( num_to_read > YY_READ_BUF_SIZE )
  2225.         num_to_read = YY_READ_BUF_SIZE;
  2226.  
  2227.     else if ( num_to_read <= 0 )
  2228.         YY_FATAL_ERROR( "fatal error - scanner input buffer overflow" );
  2229.  
  2230.     /* read in more data */
  2231.     YY_INPUT( (&yy_current_buffer->yy_ch_buf[number_to_move]),
  2232.           yy_n_chars, num_to_read );
  2233.     }
  2234.  
  2235.     if ( yy_n_chars == 0 )
  2236.     {
  2237.     if ( number_to_move - YY_MORE_ADJ == 1 )
  2238.         {
  2239.         ret_val = EOB_ACT_END_OF_FILE;
  2240.         yy_current_buffer->yy_eof_status = EOF_DONE;
  2241.         }
  2242.  
  2243.     else
  2244.         {
  2245.         ret_val = EOB_ACT_LAST_MATCH;
  2246.         yy_current_buffer->yy_eof_status = EOF_PENDING;
  2247.         }
  2248.     }
  2249.  
  2250.     else
  2251.     ret_val = EOB_ACT_CONTINUE_SCAN;
  2252.  
  2253.     yy_n_chars += number_to_move;
  2254.     yy_current_buffer->yy_ch_buf[yy_n_chars] = YY_END_OF_BUFFER_CHAR;
  2255.     yy_current_buffer->yy_ch_buf[yy_n_chars + 1] = YY_END_OF_BUFFER_CHAR;
  2256.  
  2257.     /* yytext begins at the second character in yy_ch_buf; the first
  2258.      * character is the one which preceded it before reading in the latest
  2259.      * buffer; it needs to be kept around in case it's a newline, so
  2260.      * yy_get_previous_state() will have with '^' rules active
  2261.      */
  2262.  
  2263.     yytext = &yy_current_buffer->yy_ch_buf[1];
  2264.  
  2265.     return ( ret_val );
  2266.     }
  2267.  
  2268.  
  2269. /* yy_get_previous_state - get the state just before the EOB char was reached
  2270.  *
  2271.  * synopsis
  2272.  *     yy_state_type yy_get_previous_state();
  2273.  */
  2274.  
  2275. static yy_state_type yy_get_previous_state()
  2276.  
  2277.     {
  2278.     register yy_state_type yy_current_state;
  2279.     register YY_CHAR *yy_cp;
  2280.  
  2281.     yy_current_state = yy_start;
  2282. # line 569 "flex.skel"
  2283.  
  2284.     for ( yy_cp = yytext + YY_MORE_ADJ; yy_cp < yy_c_buf_p; ++yy_cp )
  2285.     {
  2286.     register YY_CHAR yy_c = (*yy_cp ? yy_ec[*yy_cp] : 1);
  2287.     if ( yy_accept[yy_current_state] )
  2288.         {
  2289.         yy_last_accepting_state = yy_current_state;
  2290.         yy_last_accepting_cpos = yy_cp;
  2291.         }
  2292.     while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
  2293.         {
  2294.         yy_current_state = yy_def[yy_current_state];
  2295.         if ( yy_current_state >= 912 )
  2296.         yy_c = yy_meta[yy_c];
  2297.         }
  2298.     yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
  2299. # line 574 "flex.skel"
  2300.     }
  2301.  
  2302.     return ( yy_current_state );
  2303.     }
  2304.  
  2305.  
  2306. /* yy_try_NUL_trans - try to make a transition on the NUL character
  2307.  *
  2308.  * synopsis
  2309.  *     next_state = yy_try_NUL_trans( current_state );
  2310.  */
  2311.  
  2312. #ifdef YY_USE_PROTOS
  2313. static yy_state_type yy_try_NUL_trans( register yy_state_type yy_current_state )
  2314. #else
  2315. static yy_state_type yy_try_NUL_trans( yy_current_state )
  2316. register yy_state_type yy_current_state;
  2317. #endif
  2318.  
  2319.     {
  2320.     register int yy_is_jam;
  2321.     register YY_CHAR *yy_cp = yy_c_buf_p;
  2322.  
  2323.     register YY_CHAR yy_c = 1;
  2324.     if ( yy_accept[yy_current_state] )
  2325.     {
  2326.     yy_last_accepting_state = yy_current_state;
  2327.     yy_last_accepting_cpos = yy_cp;
  2328.     }
  2329.     while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
  2330.     {
  2331.     yy_current_state = yy_def[yy_current_state];
  2332.     if ( yy_current_state >= 912 )
  2333.         yy_c = yy_meta[yy_c];
  2334.     }
  2335.     yy_current_state = yy_nxt[yy_base[yy_current_state] + yy_c];
  2336.     yy_is_jam = (yy_current_state == 911);
  2337. # line 597 "flex.skel"
  2338.  
  2339.     return ( yy_is_jam ? 0 : yy_current_state );
  2340.     }
  2341.  
  2342.  
  2343. #ifdef YY_USE_PROTOS
  2344. static void yyunput( YY_CHAR c, register YY_CHAR *yy_bp )
  2345. #else
  2346. static void yyunput( c, yy_bp )
  2347. YY_CHAR c;
  2348. register YY_CHAR *yy_bp;
  2349. #endif
  2350.  
  2351.     {
  2352.     register YY_CHAR *yy_cp = yy_c_buf_p;
  2353.  
  2354.     /* undo effects of setting up yytext */
  2355.     *yy_cp = yy_hold_char;
  2356.  
  2357.     if ( yy_cp < yy_current_buffer->yy_ch_buf + 2 )
  2358.     { /* need to shift things up to make room */
  2359.     register int number_to_move = yy_n_chars + 2; /* +2 for EOB chars */
  2360.     register YY_CHAR *dest =
  2361.         &yy_current_buffer->yy_ch_buf[yy_current_buffer->yy_buf_size + 2];
  2362.     register YY_CHAR *source =
  2363.         &yy_current_buffer->yy_ch_buf[number_to_move];
  2364.  
  2365.     while ( source > yy_current_buffer->yy_ch_buf )
  2366.         *--dest = *--source;
  2367.  
  2368.     yy_cp += dest - source;
  2369.     yy_bp += dest - source;
  2370.     yy_n_chars = yy_current_buffer->yy_buf_size;
  2371.  
  2372.     if ( yy_cp < yy_current_buffer->yy_ch_buf + 2 )
  2373.         YY_FATAL_ERROR( "flex scanner push-back overflow" );
  2374.     }
  2375.  
  2376.     if ( yy_cp > yy_bp && yy_cp[-1] == '\n' )
  2377.     yy_cp[-2] = '\n';
  2378.  
  2379.     *--yy_cp = c;
  2380.  
  2381.     /* note: the formal parameter *must* be called "yy_bp" for this
  2382.      *       macro to now work correctly
  2383.      */
  2384.     YY_DO_BEFORE_ACTION; /* set up yytext again */
  2385.     }
  2386.  
  2387.  
  2388. #ifdef __cplusplus
  2389. static int yyinput()
  2390. #else
  2391. static int input()
  2392. #endif
  2393.  
  2394.     {
  2395.     int c;
  2396.     YY_CHAR *yy_cp = yy_c_buf_p;
  2397.  
  2398.     *yy_cp = yy_hold_char;
  2399.  
  2400.     if ( *yy_c_buf_p == YY_END_OF_BUFFER_CHAR )
  2401.     {
  2402.     /* yy_c_buf_p now points to the character we want to return.
  2403.      * If this occurs *before* the EOB characters, then it's a
  2404.      * valid NUL; if not, then we've hit the end of the buffer.
  2405.      */
  2406.     if ( yy_c_buf_p < &yy_current_buffer->yy_ch_buf[yy_n_chars] )
  2407.         /* this was really a NUL */
  2408.         *yy_c_buf_p = '\0';
  2409.  
  2410.     else
  2411.         { /* need more input */
  2412.         yytext = yy_c_buf_p;
  2413.         ++yy_c_buf_p;
  2414.  
  2415.         switch ( yy_get_next_buffer() )
  2416.         {
  2417.         case EOB_ACT_END_OF_FILE:
  2418.             {
  2419.             if ( yywrap() )
  2420.             {
  2421.             yy_c_buf_p = yytext + YY_MORE_ADJ;
  2422.             return ( EOF );
  2423.             }
  2424.  
  2425.             YY_NEW_FILE;
  2426.  
  2427. #ifdef __cplusplus
  2428.             return ( yyinput() );
  2429. #else
  2430.             return ( input() );
  2431. #endif
  2432.             }
  2433.             break;
  2434.  
  2435.         case EOB_ACT_CONTINUE_SCAN:
  2436.             yy_c_buf_p = yytext + YY_MORE_ADJ;
  2437.             break;
  2438.  
  2439.         case EOB_ACT_LAST_MATCH:
  2440. #ifdef __cplusplus
  2441.             YY_FATAL_ERROR( "unexpected last match in yyinput()" );
  2442. #else
  2443.             YY_FATAL_ERROR( "unexpected last match in input()" );
  2444. #endif
  2445.         }
  2446.         }
  2447.     }
  2448.  
  2449.     c = *yy_c_buf_p;
  2450.     yy_hold_char = *++yy_c_buf_p;
  2451.  
  2452.     return ( c );
  2453.     }
  2454.  
  2455.  
  2456. #ifdef YY_USE_PROTOS
  2457. void yyrestart( FILE *input_file )
  2458. #else
  2459. void yyrestart( input_file )
  2460. FILE *input_file;
  2461. #endif
  2462.  
  2463.     {
  2464.     yy_init_buffer( yy_current_buffer, input_file );
  2465.     yy_load_buffer_state();
  2466.     }
  2467.  
  2468.  
  2469. #ifdef YY_USE_PROTOS
  2470. void yy_switch_to_buffer( YY_BUFFER_STATE new_buffer )
  2471. #else
  2472. void yy_switch_to_buffer( new_buffer )
  2473. YY_BUFFER_STATE new_buffer;
  2474. #endif
  2475.  
  2476.     {
  2477.     if ( yy_current_buffer == new_buffer )
  2478.     return;
  2479.  
  2480.     if ( yy_current_buffer )
  2481.     {
  2482.     /* flush out information for old buffer */
  2483.     *yy_c_buf_p = yy_hold_char;
  2484.     yy_current_buffer->yy_buf_pos = yy_c_buf_p;
  2485.     yy_current_buffer->yy_n_chars = yy_n_chars;
  2486.     }
  2487.  
  2488.     yy_current_buffer = new_buffer;
  2489.     yy_load_buffer_state();
  2490.  
  2491.     /* we don't actually know whether we did this switch during
  2492.      * EOF (yywrap()) processing, but the only time this flag
  2493.      * is looked at is after yywrap() is called, so it's safe
  2494.      * to go ahead and always set it.
  2495.      */
  2496.     yy_did_buffer_switch_on_eof = 1;
  2497.     }
  2498.  
  2499.  
  2500. #ifdef YY_USE_PROTOS
  2501. void yy_load_buffer_state( void )
  2502. #else
  2503. void yy_load_buffer_state()
  2504. #endif
  2505.  
  2506.     {
  2507.     yy_n_chars = yy_current_buffer->yy_n_chars;
  2508.     yytext = yy_c_buf_p = yy_current_buffer->yy_buf_pos;
  2509.     yyin = yy_current_buffer->yy_input_file;
  2510.     yy_hold_char = *yy_c_buf_p;
  2511.     }
  2512.  
  2513.  
  2514. #ifdef YY_USE_PROTOS
  2515. YY_BUFFER_STATE yy_create_buffer( FILE *file, int size )
  2516. #else
  2517. YY_BUFFER_STATE yy_create_buffer( file, size )
  2518. FILE *file;
  2519. int size;
  2520. #endif
  2521.  
  2522.     {
  2523.     YY_BUFFER_STATE b;
  2524.  
  2525.     b = (YY_BUFFER_STATE) malloc( sizeof( struct yy_buffer_state ) );
  2526.  
  2527.     if ( ! b )
  2528.     YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
  2529.  
  2530.     b->yy_buf_size = size;
  2531.  
  2532.     /* yy_ch_buf has to be 2 characters longer than the size given because
  2533.      * we need to put in 2 end-of-buffer characters.
  2534.      */
  2535.     b->yy_ch_buf = (YY_CHAR *) malloc( (unsigned) (b->yy_buf_size + 2) );
  2536.  
  2537.     if ( ! b->yy_ch_buf )
  2538.     YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
  2539.  
  2540.     yy_init_buffer( b, file );
  2541.  
  2542.     return ( b );
  2543.     }
  2544.  
  2545.  
  2546. #ifdef YY_USE_PROTOS
  2547. void yy_delete_buffer( YY_BUFFER_STATE b )
  2548. #else
  2549. void yy_delete_buffer( b )
  2550. YY_BUFFER_STATE b;
  2551. #endif
  2552.  
  2553.     {
  2554.     if ( b == yy_current_buffer )
  2555.     yy_current_buffer = (YY_BUFFER_STATE) 0;
  2556.  
  2557.     free( (char *) b->yy_ch_buf );
  2558.     free( (char *) b );
  2559.     }
  2560.  
  2561.  
  2562. #ifdef YY_USE_PROTOS
  2563. void yy_init_buffer( YY_BUFFER_STATE b, FILE *file )
  2564. #else
  2565. void yy_init_buffer( b, file )
  2566. YY_BUFFER_STATE b;
  2567. FILE *file;
  2568. #endif
  2569.  
  2570.     {
  2571.     b->yy_input_file = file;
  2572.  
  2573.     /* we put in the '\n' and start reading from [1] so that an
  2574.      * initial match-at-newline will be true.
  2575.      */
  2576.  
  2577.     b->yy_ch_buf[0] = '\n';
  2578.     b->yy_n_chars = 1;
  2579.  
  2580.     /* we always need two end-of-buffer characters.  The first causes
  2581.      * a transition to the end-of-buffer state.  The second causes
  2582.      * a jam in that state.
  2583.      */
  2584.     b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR;
  2585.     b->yy_ch_buf[2] = YY_END_OF_BUFFER_CHAR;
  2586.  
  2587.     b->yy_buf_pos = &b->yy_ch_buf[1];
  2588.  
  2589.     b->yy_eof_status = EOF_NOT_SEEN;
  2590.     }
  2591. # line 407 "./ldlex.l"
  2592.  
  2593.  
  2594. void
  2595. DEFUN(lex_push_file,(file,name),
  2596.      FILE *file AND
  2597.      char *name)
  2598. {
  2599.   if (include_stack_ptr >= MAX_INCLUDE_DEPTH) 
  2600.   {
  2601.     einfo("%F:includes nested too deeply");
  2602.   }
  2603.   file_name_stack[include_stack_ptr] = name;
  2604.   include_stack[include_stack_ptr] = YY_CURRENT_BUFFER;
  2605.  
  2606.   include_stack_ptr++;
  2607.   yyin = file;
  2608.   yy_switch_to_buffer(yy_create_buffer(yyin, YY_BUF_SIZE));
  2609.  
  2610.   BEGIN(SCRIPT);
  2611. }
  2612.  
  2613. YY_BUFFER_STATE 
  2614. DEFUN(yy_create_string_buffer,(string,  size),
  2615.       CONST char *string AND
  2616.       int size )
  2617. {
  2618.   YY_BUFFER_STATE b;
  2619.  
  2620.   b = (YY_BUFFER_STATE) malloc( sizeof( struct yy_buffer_state ) );
  2621.   b->yy_input_file = 0;
  2622.   
  2623.   if ( ! b )
  2624.    YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
  2625.  
  2626.   b->yy_buf_size = size;
  2627.  
  2628.   /* yy_ch_buf has to be 2 characters longer than the size given because
  2629.    * we need to put in 2 end-of-buffer characters.
  2630.    */
  2631.   b->yy_ch_buf = (YY_CHAR *) malloc( (unsigned) (b->yy_buf_size + 3) );
  2632.  
  2633.   if ( ! b->yy_ch_buf )
  2634.    YY_FATAL_ERROR( "out of dynamic memory in yy_create_buffer()" );
  2635.  
  2636.  
  2637.   b->yy_ch_buf[0] = '\n';
  2638.   strcpy(b->yy_ch_buf+1,  string);
  2639.   b->yy_ch_buf[size+1] = YY_END_OF_BUFFER_CHAR;
  2640.   b->yy_ch_buf[size+2] = YY_END_OF_BUFFER_CHAR;
  2641.     b->yy_n_chars = size+1;
  2642.   b->yy_buf_pos = &b->yy_ch_buf[1];
  2643.  
  2644.   b->yy_eof_status = EOF_NOT_SEEN;
  2645.  
  2646.   return ( b );
  2647. }
  2648.  
  2649.  
  2650.  
  2651. void
  2652. DEFUN(lex_redirect,( string),
  2653.     CONST  char *string)
  2654. {
  2655.   YY_BUFFER_STATE tmp;
  2656.  
  2657.   int len = strlen(string);
  2658.   yy_init = 0  ;  
  2659.   if (include_stack_ptr >= MAX_INCLUDE_DEPTH) 
  2660.   {
  2661.     einfo("%F: macros nested too deeply");
  2662.   }
  2663.   file_name_stack[include_stack_ptr] = "redirect";
  2664.   include_stack[include_stack_ptr] = YY_CURRENT_BUFFER;
  2665.   include_stack_ptr++;
  2666.   tmp =   yy_create_string_buffer(string, len);
  2667.   
  2668.   yy_switch_to_buffer(tmp);
  2669.   BEGIN(COMMAND);
  2670.   yyout = stdout;
  2671. }
  2672.  
  2673. int state_stack[20];
  2674. int *state_stack_p = state_stack;
  2675.  
  2676. void
  2677. DEFUN_VOID(ldlex_script)
  2678. {
  2679.   *(state_stack_p)++ = yy_start;
  2680.  
  2681.   BEGIN(SCRIPT);
  2682. }
  2683.  
  2684.  
  2685. void
  2686. DEFUN_VOID(ldlex_mri_script)
  2687. {
  2688.   *(state_stack_p)++ = yy_start;
  2689.   BEGIN(MRI);
  2690. }
  2691.  
  2692. void
  2693. DEFUN_VOID(ldlex_defsym)
  2694. {
  2695.   *(state_stack_p)++ = yy_start;
  2696.   BEGIN(DEFSYMEXP);
  2697. }
  2698.        
  2699. void
  2700. DEFUN_VOID(ldlex_expression)
  2701. {
  2702.   *(state_stack_p)++ = yy_start;
  2703.   BEGIN(EXPRESSION);
  2704.  
  2705. }
  2706. void
  2707. DEFUN_VOID(ldlex_both)
  2708. {
  2709.   *(state_stack_p)++ = yy_start;
  2710.   BEGIN(BOTH);
  2711. }
  2712. void
  2713. DEFUN_VOID(ldlex_command)
  2714. {
  2715.   *(state_stack_p)++ = yy_start;
  2716.   BEGIN(COMMAND);
  2717. }
  2718.  
  2719. void
  2720. DEFUN_VOID(ldlex_popstate)
  2721. {
  2722.   yy_start = *(--state_stack_p);
  2723. }
  2724.  
  2725. yy_input(buf, result, max_size)
  2726. char *buf;
  2727. int *result;
  2728. int max_size;
  2729. {
  2730.   *result = 0; 
  2731.   if (yy_current_buffer->yy_input_file)
  2732.   {
  2733.     if (yyin)
  2734.      if ( (*result = read( fileno(yyin), (char *) buf, max_size )) < 0 ) 
  2735.       YY_FATAL_ERROR( "read() in flex scanner failed" );
  2736.   }
  2737. }
  2738.  
  2739. static
  2740. comment()
  2741. {
  2742.   int c;
  2743.   while (1)
  2744.   {
  2745.     c = input();
  2746.     while (c !='*' && c != EOF) 
  2747.     {
  2748.       if (c == '\n') lineno++;
  2749.       c = input();
  2750.     }
  2751.  
  2752.  
  2753.     if (c == '*')
  2754.     {
  2755.       c = input();
  2756.       while ( c == '*')
  2757.        c = input();
  2758.       if ( c == '/' )
  2759.        break;            /* found the end */
  2760.     }
  2761.  
  2762.     if ( c == EOF )
  2763.     {
  2764.       einfo( "%F%P :EOF in comment");
  2765.       break;
  2766.     }
  2767.   }
  2768. }
  2769.