vylex.yy.c

編譯器的虛擬yacc工具

17,
40,
0, 

40,
0, 

40,
0, 

40,
0, 

40,
0, 

40,
0, 

4,
40,
0, 

36,
0, 

34,
0, 

33,
0, 

11,
40,
0, 

8,
40,
0, 

14,
40,
0, 

19,
40,
0, 

40,
0, 

1,
40,
0, 

16,
40,
0, 

5,
40,
0, 

40,
0, 

7,
40,
0, 

15,
40,
0, 

38,
0, 
0};
# define YYTYPE unsigned char
struct yywork { YYTYPE verify, advance; } yycrank[] = {
0,0,	0,0,	1,5,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	1,6,	1,7,	
0,0,	3,28,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	3,29,	3,30,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	1,8,	
0,0,	1,9,	1,10,	0,0,	
1,11,	0,0,	45,79,	4,31,	
12,47,	80,109,	3,28,	1,5,	
1,12,	1,13,	31,71,	0,0,	
0,0,	0,0,	3,31,	0,0,	
0,0,	0,0,	3,28,	0,0,	
3,28,	1,14,	0,0,	2,27,	
2,9,	2,10,	1,13,	2,11,	
0,0,	0,0,	0,0,	1,15,	
82,110,	0,0,	0,0,	2,12,	
15,51,	3,28,	0,0,	51,82,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	1,16,	
2,14,	0,0,	0,0,	0,0,	
10,36,	16,52,	0,0,	0,0,	
1,13,	0,0,	2,15,	0,0,	
1,17,	1,18,	1,19,	1,20,	
8,32,	23,64,	1,21,	3,28,	
26,68,	1,22,	37,72,	17,53,	
8,32,	8,32,	2,16,	1,23,	
1,24,	1,25,	17,54,	22,63,	
1,26,	18,55,	19,57,	20,59,	
21,61,	25,67,	20,60,	2,17,	
2,18,	2,19,	2,20,	18,56,	
21,62,	2,21,	19,58,	24,65,	
2,22,	8,33,	24,66,	38,73,	
9,34,	39,74,	2,23,	2,24,	
2,25,	40,75,	42,78,	2,26,	
53,85,	8,32,	54,86,	8,32,	
9,35,	9,35,	9,35,	9,35,	
9,35,	9,35,	9,35,	9,35,	
9,35,	9,35,	55,87,	10,37,	
56,88,	10,38,	11,45,	10,39,	
8,32,	10,40,	57,89,	10,41,	
10,42,	59,92,	11,45,	11,0,	
60,93,	62,94,	10,43,	63,96,	
10,44,	35,35,	35,35,	35,35,	
35,35,	35,35,	35,35,	35,35,	
35,35,	35,35,	35,35,	41,76,	
52,83,	58,90,	62,95,	64,97,	
65,98,	66,99,	8,32,	11,45,	
67,100,	41,77,	52,84,	68,101,	
58,91,	72,102,	73,103,	74,104,	
75,105,	76,106,	77,107,	11,45,	
78,108,	11,45,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
83,111,	84,112,	85,113,	86,114,	
87,115,	88,116,	11,45,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	11,46,	89,117,	90,118,	
11,45,	13,48,	91,119,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	13,48,	13,48,	13,48,	
13,48,	14,49,	92,120,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	94,121,	96,122,	97,123,	
98,124,	14,50,	99,125,	100,126,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	101,127,	102,128,	
103,129,	104,130,	105,131,	106,132,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	14,49,	14,49,	
14,49,	14,49,	27,69,	107,133,	
108,134,	46,80,	111,135,	112,136,	
115,137,	116,138,	27,69,	27,70,	
119,139,	46,80,	46,0,	120,140,	
121,141,	123,142,	124,143,	125,144,	
126,145,	127,146,	129,147,	131,148,	
132,149,	134,150,	135,151,	137,152,	
138,153,	139,154,	141,155,	142,156,	
143,157,	144,158,	145,159,	27,69,	
147,160,	155,161,	46,80,	159,162,	
160,163,	163,164,	0,0,	46,81,	
0,0,	0,0,	0,0,	27,69,	
0,0,	27,69,	46,80,	0,0,	
46,80,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	27,69,	0,0,	
0,0,	46,80,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
0,0,	0,0,	0,0,	0,0,	
27,69,	0,0,	0,0,	46,80,	
0,0};
struct yysvf yysvec[] = {
0,	0,	0,
yycrank+-1,	0,		0,	
yycrank+-28,	yysvec+1,	0,	
yycrank+-12,	0,		0,	
yycrank+-1,	yysvec+3,	0,	
yycrank+0,	0,		yyvstop+1,
yycrank+0,	0,		yyvstop+3,
yycrank+0,	0,		yyvstop+6,
yycrank+-103,	0,		yyvstop+8,
yycrank+104,	0,		yyvstop+10,
yycrank+55,	0,		yyvstop+12,
yycrank+-165,	0,		yyvstop+14,
yycrank+2,	0,		yyvstop+16,
yycrank+166,	0,		yyvstop+18,
yycrank+243,	0,		yyvstop+21,
yycrank+3,	yysvec+13,	yyvstop+23,
yycrank+4,	yysvec+13,	yyvstop+26,
yycrank+14,	yysvec+13,	yyvstop+29,
yycrank+20,	yysvec+13,	yyvstop+32,
yycrank+14,	yysvec+13,	yyvstop+35,
yycrank+15,	yysvec+13,	yyvstop+38,
yycrank+22,	yysvec+13,	yyvstop+41,
yycrank+8,	yysvec+13,	yyvstop+44,
yycrank+4,	yysvec+13,	yyvstop+47,
yycrank+19,	yysvec+13,	yyvstop+50,
yycrank+4,	yysvec+13,	yyvstop+53,
yycrank+4,	yysvec+13,	yyvstop+56,
yycrank+-365,	0,		yyvstop+59,
yycrank+0,	0,		yyvstop+62,
yycrank+0,	0,		yyvstop+64,
yycrank+0,	0,		yyvstop+67,
yycrank+3,	0,		yyvstop+69,
yycrank+0,	yysvec+8,	0,	
yycrank+0,	0,		yyvstop+71,
yycrank+0,	0,		yyvstop+73,
yycrank+133,	0,		yyvstop+75,
yycrank+0,	0,		yyvstop+77,
yycrank+9,	0,		0,	
yycrank+28,	0,		0,	
yycrank+27,	0,		0,	
yycrank+40,	0,		0,	
yycrank+80,	0,		0,	
yycrank+36,	0,		0,	
yycrank+0,	0,		yyvstop+79,
yycrank+0,	0,		yyvstop+81,
yycrank+3,	0,		0,	
yycrank+-368,	0,		0,	
yycrank+0,	0,		yyvstop+83,
yycrank+0,	yysvec+13,	yyvstop+85,
yycrank+0,	yysvec+14,	0,	
yycrank+0,	0,		yyvstop+87,
yycrank+3,	yysvec+13,	yyvstop+89,
yycrank+97,	yysvec+13,	yyvstop+91,
yycrank+33,	yysvec+13,	yyvstop+93,
yycrank+53,	yysvec+13,	yyvstop+95,
yycrank+60,	yysvec+13,	yyvstop+97,
yycrank+47,	yysvec+13,	yyvstop+99,
yycrank+55,	yysvec+13,	yyvstop+101,
yycrank+88,	yysvec+13,	yyvstop+103,
yycrank+62,	yysvec+13,	yyvstop+105,
yycrank+62,	yysvec+13,	yyvstop+107,
yycrank+0,	yysvec+13,	yyvstop+109,
yycrank+78,	yysvec+13,	yyvstop+112,
yycrank+69,	yysvec+13,	yyvstop+114,
yycrank+79,	yysvec+13,	yyvstop+116,
yycrank+82,	yysvec+13,	yyvstop+118,
yycrank+92,	yysvec+13,	yyvstop+120,
yycrank+88,	yysvec+13,	yyvstop+122,
yycrank+98,	yysvec+13,	yyvstop+124,
yycrank+0,	yysvec+27,	yyvstop+126,
yycrank+0,	0,		yyvstop+128,
yycrank+0,	0,		yyvstop+130,
yycrank+103,	0,		0,	
yycrank+96,	0,		0,	
yycrank+106,	0,		0,	
yycrank+105,	0,		0,	
yycrank+102,	0,		0,	
yycrank+98,	0,		0,	
yycrank+107,	0,		0,	
yycrank+0,	0,		yyvstop+132,
yycrank+6,	0,		0,	
yycrank+0,	yysvec+80,	yyvstop+134,
yycrank+3,	yysvec+13,	yyvstop+136,
yycrank+119,	yysvec+13,	yyvstop+138,
yycrank+115,	yysvec+13,	yyvstop+140,
yycrank+125,	yysvec+13,	yyvstop+142,
yycrank+113,	yysvec+13,	yyvstop+144,
yycrank+123,	yysvec+13,	yyvstop+146,
yycrank+131,	yysvec+13,	yyvstop+148,
yycrank+157,	yysvec+13,	yyvstop+150,
yycrank+143,	yysvec+13,	yyvstop+152,
yycrank+161,	yysvec+13,	yyvstop+154,
yycrank+193,	yysvec+13,	yyvstop+156,
yycrank+0,	yysvec+13,	yyvstop+158,
yycrank+193,	yysvec+13,	yyvstop+161,
yycrank+0,	yysvec+13,	yyvstop+163,
yycrank+199,	yysvec+13,	yyvstop+166,
yycrank+186,	yysvec+13,	yyvstop+168,
yycrank+187,	yysvec+13,	yyvstop+170,
yycrank+190,	yysvec+13,	yyvstop+172,
yycrank+206,	yysvec+13,	yyvstop+174,
yycrank+226,	yysvec+13,	yyvstop+176,
yycrank+219,	0,		0,	
yycrank+239,	0,		0,	
yycrank+238,	0,		0,	
yycrank+234,	0,		0,	
yycrank+238,	0,		0,	
yycrank+266,	0,		0,	
yycrank+257,	0,		0,	
yycrank+0,	0,		yyvstop+178,
yycrank+0,	yysvec+13,	yyvstop+180,
yycrank+260,	yysvec+13,	yyvstop+183,
yycrank+255,	yysvec+13,	yyvstop+185,
yycrank+0,	yysvec+13,	yyvstop+187,
yycrank+0,	yysvec+13,	yyvstop+190,
yycrank+262,	yysvec+13,	yyvstop+193,
yycrank+265,	yysvec+13,	yyvstop+195,
yycrank+0,	yysvec+13,	yyvstop+197,
yycrank+0,	yysvec+13,	yyvstop+200,
yycrank+262,	yysvec+13,	yyvstop+203,
yycrank+263,	yysvec+13,	yyvstop+205,
yycrank+263,	yysvec+13,	yyvstop+207,
yycrank+0,	yysvec+13,	yyvstop+209,
yycrank+267,	yysvec+13,	yyvstop+212,
yycrank+283,	yysvec+13,	yyvstop+214,
yycrank+284,	yysvec+13,	yyvstop+216,
yycrank+284,	yysvec+13,	yyvstop+218,
yycrank+284,	yysvec+13,	yyvstop+220,
yycrank+0,	0,		yyvstop+222,
yycrank+271,	0,		0,	
yycrank+0,	0,		yyvstop+224,
yycrank+271,	0,		0,	
yycrank+278,	0,		0,	
yycrank+0,	0,		yyvstop+226,
yycrank+279,	0,		0,	
yycrank+274,	yysvec+13,	yyvstop+228,
yycrank+0,	yysvec+13,	yyvstop+230,
yycrank+290,	yysvec+13,	yyvstop+233,
yycrank+291,	yysvec+13,	yyvstop+235,
yycrank+283,	yysvec+13,	yyvstop+237,
yycrank+0,	yysvec+13,	yyvstop+239,
yycrank+294,	yysvec+13,	yyvstop+242,
yycrank+285,	yysvec+13,	yyvstop+244,
yycrank+280,	yysvec+13,	yyvstop+246,
yycrank+293,	yysvec+13,	yyvstop+248,
yycrank+297,	yysvec+13,	yyvstop+250,
yycrank+0,	yysvec+13,	yyvstop+252,
yycrank+285,	0,		0,	
yycrank+0,	0,		yyvstop+255,
yycrank+0,	0,		yyvstop+257,
yycrank+0,	0,		yyvstop+259,
yycrank+0,	yysvec+13,	yyvstop+261,
yycrank+0,	yysvec+13,	yyvstop+264,
yycrank+0,	yysvec+13,	yyvstop+267,
yycrank+0,	yysvec+13,	yyvstop+270,
yycrank+300,	yysvec+13,	yyvstop+273,
yycrank+0,	yysvec+13,	yyvstop+275,
yycrank+0,	yysvec+13,	yyvstop+278,
yycrank+0,	yysvec+13,	yyvstop+281,
yycrank+301,	yysvec+13,	yyvstop+284,
yycrank+293,	0,		0,	
yycrank+0,	yysvec+13,	yyvstop+286,
yycrank+0,	yysvec+13,	yyvstop+289,
yycrank+306,	0,		0,	
yycrank+0,	0,		yyvstop+292,
0,	0,	0};
struct yywork *yytop = yycrank+463;
struct yysvf *yybgin = yysvec+1;
char yymatch[] = {
  0,   1,   1,   1,   1,   1,   1,   1, 
  1,   9,  10,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  9,   1,  34,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,  46,   1, 
 48,  48,  48,  48,  48,  48,  48,  48, 
 48,  48,   1,   1,   1,   1,   1,   1, 
  1,  65,  65,  65,  65,  65,  65,  65, 
 65,  65,  65,  65,  65,  65,  65,  65, 
 65,  65,  65,  65,  65,  65,  65,  65, 
 65,  65,  65,   1,   1,   1,   1,  95, 
  1,  65,  65,  65,  65,  65,  65,  65, 
 65,  65,  65,  65,  65,  65,  65,  65, 
 65,  65,  65,  65,  65,  65,  65,  65, 
 65,  65,  65,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
  1,   1,   1,   1,   1,   1,   1,   1, 
0};
char yyextra[] = {
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,1,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0};
/*	Copyright (c) 1989 AT&T	*/
/*	  All Rights Reserved  	*/

/*	THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T	*/
/*	The copyright notice above does not evidence any   	*/
/*	actual or intended publication of such source code.	*/

#pragma ident	"@(#)ncform	6.11	97/01/06 SMI"

extern long yylineno,yycharno,yytok,yybline;
# define YYU(x) x
# define NLSTATE yyprevious=YYNEWLINE
struct yysvf *yylstate [YYLMAX], **yylsp, **yyolsp;
char yysbuf[YYLMAX];
char *yysptr = yysbuf;
int *yyfnd;
extern struct yysvf *yyestate;
int yyprevious = YYNEWLINE;
#if defined(__cplusplus) || defined(__STDC__)
int yylook(void)
#else
yylook()
#endif
{
	register struct yysvf *yystate, **lsp;
	register struct yywork *yyt;
	struct yysvf *yyz;
	int yych, yyfirst;
	struct yywork *yyr;
# ifdef LEXDEBUG
	int debug;
# endif
	char *yylastch;
	/* start off machines */
# ifdef LEXDEBUG
	debug = 0;
# endif
	yyfirst=1;
	yytok=yycharno+1;if (!yymorfg)
		yylastch = yytext;
	else {
		yymorfg=0;
		yylastch = yytext+yyleng;
		}
	for(;;){
		lsp = yylstate;
		yyestate = yystate = yybgin;
		if (yyprevious==YYNEWLINE) yystate++;
		for (;;){
# ifdef LEXDEBUG
			if(debug)fprintf(yyout,"state %d\n",yystate-yysvec-1);
# endif
			yyt = yystate->yystoff;
			if(yyt == yycrank && !yyfirst){  /* may not be any transitions */
				yyz = yystate->yyother;
				if(yyz == 0)break;
				if(yyz->yystoff == yycrank)break;
				}
#ifndef __cplusplus
			*yylastch++ = yych = input();
#else
			*yylastch++ = yych = lex_input();
#endif
#ifdef YYISARRAY
			if(yylastch > &yytext[YYLMAX]) {
				fprintf(yyout,"Input string too long, limit %d\n",YYLMAX);
				exit(1);
			}
#else
			if (yylastch >= &yytext[ yytextsz ]) {
				int	x = yylastch - yytext;

				yytextsz += YYTEXTSZINC;
				if (yytext == yy_tbuf) {
				    yytext = (char *) malloc(yytextsz);
				    memcpy(yytext, yy_tbuf, sizeof (yy_tbuf));
				}
				else
				    yytext = (char *) realloc(yytext, yytextsz);
				if (!yytext) {
				    fprintf(yyout,
					"Cannot realloc yytext\n");
				    exit(1);
				}
				yylastch = yytext + x;
			}
#endif
			yyfirst=0;
		tryagain:
# ifdef LEXDEBUG
			if(debug){
				fprintf(yyout,"char ");
				allprint(yych);
				putchar('\n');
				}
# endif
			yyr = yyt;
			if ( (int)yyt > (int)yycrank){
				yyt = yyr + yych;
				if (yyt <= yytop && yyt->verify+yysvec == yystate){
					if(yyt->advance+yysvec == YYLERR)	/* error transitions */
						{unput(*--yylastch);break;}
					*lsp++ = yystate = yyt->advance+yysvec;
					if(lsp > &yylstate[YYLMAX]) {
						fprintf(yyout,"Input string too long, limit %d\n",YYLMAX);
						exit(1);
					}
					goto contin;
					}
				}
# ifdef YYOPTIM
			else if((int)yyt < (int)yycrank) {		/* r < yycrank */
				yyt = yyr = yycrank+(yycrank-yyt);
# ifdef LEXDEBUG
				if(debug)fprintf(yyout,"compressed state\n");
# endif
				yyt = yyt + yych;
				if(yyt <= yytop && yyt->verify+yysvec == yystate){
					if(yyt->advance+yysvec == YYLERR)	/* error transitions */
						{unput(*--yylastch);break;}
					*lsp++ = yystate = yyt->advance+yysvec;
					if(lsp > &yylstate[YYLMAX]) {
						fprintf(yyout,"Input string too long, limit %d\n",YYLMAX);
						exit(1);
					}
					goto contin;
					}
				yyt = yyr + YYU(yymatch[yych]);
# ifdef LEXDEBUG
				if(debug){
					fprintf(yyout,"try fall back character ");
					allprint(YYU(yymatch[yych]));
					putchar('\n');
					}
# endif
				if(yyt <= yytop && yyt->verify+yysvec == yystate){
					if(yyt->advance+yysvec == YYLERR)	/* error transition */
						{unput(*--yylastch);break;}
					*lsp++ = yystate = yyt->advance+yysvec;
					if(lsp > &yylstate[YYLMAX]) {
						fprintf(yyout,"Input string too long, limit %d\n",YYLMAX);
						exit(1);
					}
					goto contin;
					}
				}
			if ((yystate = yystate->yyother) && (yyt= yystate->yystoff) != yycrank){
# ifdef LEXDEBUG
				if(debug)fprintf(yyout,"fall back to state %d\n",yystate-yysvec-1);
# endif
				goto tryagain;
				}
# endif
			else
				{unput(*--yylastch);break;}
		contin:
# ifdef LEXDEBUG
			if(debug){
				fprintf(yyout,"state %d char ",yystate-yysvec-1);
				allprint(yych);
				putchar('\n');
				}
# endif
			;
			}
# ifdef LEXDEBUG
		if(debug){
			fprintf(yyout,"stopped at %d with ",*(lsp-1)-yysvec-1);
			allprint(yych);
			putchar('\n');
			}
# endif
		while (lsp-- > yylstate){
			*yylastch-- = 0;
			if (*lsp != 0 && (yyfnd= (*lsp)->yystops) && *yyfnd > 0){
				yyolsp = lsp;
				if(yyextra[*yyfnd]){		/* must backup */
					while(yyback((*lsp)->yystops,-*yyfnd) != 1 && lsp > yylstate){
						lsp--;
						unput(*yylastch--);
						}
					}
				yyprevious = YYU(*yylastch);
				yylsp = lsp;
				yyleng = yylastch-yytext+1;
				yytext[yyleng] = 0;
# ifdef LEXDEBUG
				if(debug){
					fprintf(yyout,"\nmatch ");
					sprint(yytext);
					fprintf(yyout," action %d\n",*yyfnd);
					}
# endif
				return(*yyfnd++);
				}
			unput(*yylastch);
			}
		if (yytext[0] == 0  /* && feof(yyin) */)
			{
			yysptr=yysbuf;
			return(0);
			}
#ifndef __cplusplus
		yyprevious = yytext[0] = input();
		if (yyprevious>0)
			output(yyprevious);
#else
		yyprevious = yytext[0] = lex_input();
		if (yyprevious>0)
			lex_output(yyprevious);
#endif
		yylastch=yytext;
# ifdef LEXDEBUG
		if(debug)putchar('\n');
# endif
		}
	}
#if defined(__cplusplus) || defined(__STDC__)
int yyback(int *p, int m)
#else
yyback(p, m)
	int *p;
#endif
{
	if (p==0) return(0);
	while (*p) {
		if (*p++ == m)
			return(1);
	}
	return(0);
}
	/* the following are only used in the lex library */
#if defined(__cplusplus) || defined(__STDC__)
int yyinput(void)
#else
yyinput()
#endif
{
#ifndef __cplusplus
	return(input());
#else
	return(lex_input());
#endif
	}
#if defined(__cplusplus) || defined(__STDC__)
void yyoutput(int c)
#else
yyoutput(c)
  int c; 
#endif
{
#ifndef __cplusplus
	output(c);
#else
	lex_output(c);
#endif
	}
#if defined(__cplusplus) || defined(__STDC__)
void yyunput(int c)
#else
yyunput(c)
   int c; 
#endif
{
	unput(c);
	}