scan.c

大3编译原理课程设计 绝对符合老师要求 报告代码一应俱全 很详细 很靠谱

/****************************************************************************
*                     U N R E G I S T E R E D   C O P Y
* 
* You are on day 12 of your 30 day trial period.
* 
* This file was produced by an UNREGISTERED COPY of Parser Generator. It is
* for evaluation purposes only. If you continue to use Parser Generator 30
* days after installation then you are required to purchase a license. For
* more information see the online help or go to the Bumble-Bee Software
* homepage at:
* 
* http://www.bumblebeesoftware.com
* 
* This notice must remain present in the file. It cannot be removed.
****************************************************************************/

/****************************************************************************
* scan.c
* C source file generated from scan.l.
* 
* Date: 12/20/08
* Time: 00:16:10
* 
* ALex Version: 2.07
****************************************************************************/

#include <yylex.h>

/* namespaces */
#if defined(__cplusplus) && defined(YYSTDCPPLIB)
using namespace std;
#endif
#if defined(__cplusplus) && defined(YYNAMESPACE)
using namespace yl;
#endif

#define YYFASTLEXER

#line 6 ".\\scan.l"
 
#include "globals.h" 
#include "util.h" 
#include "scan.h" 
#include "parse.h" 

char tokenString[MAXTOKENLEN+1]; 

#line 49 "scan.c"
/* repeated because of possible precompiled header */
#include <yylex.h>

/* namespaces */
#if defined(__cplusplus) && defined(YYSTDCPPLIB)
using namespace std;
#endif
#if defined(__cplusplus) && defined(YYNAMESPACE)
using namespace yl;
#endif

#define YYFASTLEXER

#include ".\scan.h"

#ifndef YYTEXT_SIZE
#define YYTEXT_SIZE 100
#endif
#ifndef YYUNPUT_SIZE
#define YYUNPUT_SIZE YYTEXT_SIZE
#endif
#ifndef YYTEXT_MAX
#define YYTEXT_MAX 0
#endif
#ifndef YYUNPUT_MAX
#define YYUNPUT_MAX YYTEXT_MAX
#endif

/* yytext */
static char YYNEAR yysatext[(YYTEXT_SIZE) + 1];		/* extra char for \0 */
char YYFAR *YYNEAR YYDCDECL yystext = yysatext;
char YYFAR *YYNEAR YYDCDECL yytext = yysatext;
int YYNEAR YYDCDECL yystext_size = (YYTEXT_SIZE);
int YYNEAR YYDCDECL yytext_size = (YYTEXT_SIZE);
int YYNEAR YYDCDECL yytext_max = (YYTEXT_MAX);

/* yystatebuf */
#if (YYTEXT_SIZE) != 0
static int YYNEAR yysastatebuf[(YYTEXT_SIZE)];
int YYFAR *YYNEAR YYDCDECL yysstatebuf = yysastatebuf;
int YYFAR *YYNEAR YYDCDECL yystatebuf = yysastatebuf;
#else
int YYFAR *YYNEAR YYDCDECL yysstatebuf = NULL;
int YYFAR *YYNEAR YYDCDECL yystatebuf = NULL;
#endif

/* yyunputbuf */
#if (YYUNPUT_SIZE) != 0
static int YYNEAR yysaunputbuf[(YYUNPUT_SIZE)];
int YYFAR *YYNEAR YYDCDECL yysunputbufptr = yysaunputbuf;
int YYFAR *YYNEAR YYDCDECL yyunputbufptr = yysaunputbuf;
#else
int YYFAR *YYNEAR YYDCDECL yysunputbufptr = NULL;
int YYFAR *YYNEAR YYDCDECL yyunputbufptr = NULL;
#endif
int YYNEAR YYDCDECL yysunput_size = (YYUNPUT_SIZE);
int YYNEAR YYDCDECL yyunput_size = (YYUNPUT_SIZE);
int YYNEAR YYDCDECL yyunput_max = (YYUNPUT_MAX);

/* backwards compatability with lex */
#ifdef input
#ifdef YYPROTOTYPE
int YYCDECL yyinput(void)
#else
int YYCDECL yyinput()
#endif
{
	return input();
}
#else
#define input yyinput
#endif

#ifdef output
#ifdef YYPROTOTYPE
void YYCDECL yyoutput(int ch)
#else
void YYCDECL yyoutput(ch)
int ch;
#endif
{
	output(ch);
}
#else
#define output yyoutput
#endif

#ifdef unput
#ifdef YYPROTOTYPE
void YYCDECL yyunput(int ch)
#else
void YYCDECL yyunput(ch)
int ch;
#endif
{
	unput(ch);
}
#else
#define unput yyunput
#endif

#ifndef YYNBORLANDWARN
#ifdef __BORLANDC__
#pragma warn -rch		/* <warning: unreachable code> off */
#endif
#endif

#ifdef YYPROTOTYPE
int YYCDECL yylexeraction(int action)
#else
int YYCDECL yylexeraction(action)
int action;
#endif
{
	yyreturnflg = YYTRUE;
	switch (action) {
	case 1:
		{
#line 41 ".\\scan.l"
return INT;
#line 170 "scan.c"
		}
		break;
	case 2:
		{
#line 42 ".\\scan.l"
return FLOAT;
#line 177 "scan.c"
		}
		break;
	case 3:
		{
#line 43 ".\\scan.l"
return CHAR;
#line 184 "scan.c"
		}
		break;
	case 4:
		{
#line 44 ".\\scan.l"
return VOID;
#line 191 "scan.c"
		}
		break;
	case 5:
		{
#line 45 ".\\scan.l"
return IF;
#line 198 "scan.c"
		}
		break;
	case 6:
		{
#line 46 ".\\scan.l"
return ELSE;
#line 205 "scan.c"
		}
		break;
	case 7:
		{
#line 47 ".\\scan.l"
return WHILE;
#line 212 "scan.c"
		}
		break;
	case 8:
		{
#line 48 ".\\scan.l"
return CONTINUE;
#line 219 "scan.c"
		}
		break;
	case 9:
		{
#line 49 ".\\scan.l"
return BREAK;
#line 226 "scan.c"
		}
		break;
	case 10:
		{
#line 50 ".\\scan.l"
return RETURN;
#line 233 "scan.c"
		}
		break;
	case 11:
		{
#line 51 ".\\scan.l"
return PLUS;
#line 240 "scan.c"
		}
		break;
	case 12:
		{
#line 52 ".\\scan.l"
return SUB;
#line 247 "scan.c"
		}
		break;
	case 13:
		{
#line 53 ".\\scan.l"
return MUT;
#line 254 "scan.c"
		}
		break;
	case 14:
		{
#line 54 ".\\scan.l"
return DIV;
#line 261 "scan.c"
		}
		break;
	case 15:
		{
#line 55 ".\\scan.l"
return LT;
#line 268 "scan.c"
		}
		break;
	case 16:
		{
#line 56 ".\\scan.l"
return LE;
#line 275 "scan.c"
		}
		break;
	case 17:
		{
#line 57 ".\\scan.l"
return GT;
#line 282 "scan.c"
		}
		break;
	case 18:
		{
#line 58 ".\\scan.l"
return GE;
#line 289 "scan.c"
		}
		break;
	case 19:
		{
#line 59 ".\\scan.l"
return EQ;
#line 296 "scan.c"
		}
		break;
	case 20:
		{
#line 60 ".\\scan.l"
return NEQ;
#line 303 "scan.c"
		}
		break;
	case 21:
		{
#line 61 ".\\scan.l"
return AND;
#line 310 "scan.c"
		}
		break;
	case 22:
		{
#line 62 ".\\scan.l"
return OR;
#line 317 "scan.c"
		}
		break;
	case 23:
		{
#line 63 ".\\scan.l"
return NOT;
#line 324 "scan.c"
		}
		break;
	case 24:
		{
#line 64 ".\\scan.l"
return ASSIGN;
#line 331 "scan.c"
		}
		break;
	case 25:
		{
#line 65 ".\\scan.l"
return SEMI;
#line 338 "scan.c"
		}
		break;
	case 26:
		{
#line 66 ".\\scan.l"
return COMMA;
#line 345 "scan.c"
		}
		break;
	case 27:
		{
#line 67 ".\\scan.l"
return LP;
#line 352 "scan.c"
		}
		break;
	case 28:
		{
#line 68 ".\\scan.l"
return RP;
#line 359 "scan.c"
		}
		break;
	case 29:
		{
#line 69 ".\\scan.l"
return LSP;
#line 366 "scan.c"
		}
		break;
	case 30:
		{
#line 70 ".\\scan.l"
return RSP;
#line 373 "scan.c"
		}
		break;
	case 31:
		{
#line 71 ".\\scan.l"
return LFP;
#line 380 "scan.c"
		}
		break;
	case 32:
		{
#line 72 ".\\scan.l"
return RFP;
#line 387 "scan.c"
		}
		break;
	case 33:
		{
#line 73 ".\\scan.l"
return ID;
#line 394 "scan.c"
		}
		break;
	case 34:
		{
#line 74 ".\\scan.l"
return NUM;
#line 401 "scan.c"
		}
		break;
	case 35:
		{
#line 75 ".\\scan.l"
return FNUM;
#line 408 "scan.c"
		}
		break;
	case 36:
		{
#line 76 ".\\scan.l"
return SCHAR;
#line 415 "scan.c"
		}
		break;
	case 37:
		{
#line 77 ".\\scan.l"
lineno++;
#line 422 "scan.c"
		}
		break;
	case 38:
		{
#line 78 ".\\scan.l"

#line 429 "scan.c"
		}
		break;
	case 39:
		{
#line 79 ".\\scan.l"
 char c; 
while ((c = yyinput()) != '\n') 
if (c == EOF) return ENDFILE; 
yyunput(c); 

#line 440 "scan.c"
		}
		break;
	case 40:
		{
#line 84 ".\\scan.l"
 char c; 
int done = FALSE; 
do { 
while ((c = yyinput()) != '*') 
if (c == EOF) return ERROR; 
while ((c = yyinput()) == '*'); 
if (c == '/') done = TRUE; 
} while (!done); 

#line 455 "scan.c"
		}
		break;
	case 41:
		{
#line 93 ".\\scan.l"
return ERROR;
#line 462 "scan.c"
		}
		break;
	default:
		yyassert(0);
		break;
	}
	yyreturnflg = YYFALSE;
	return 0;
}

#ifndef YYNBORLANDWARN
#ifdef __BORLANDC__
#pragma warn .rch		/* <warning: unreachable code> to the old state */
#endif
#endif
YYCONST yymatch_t YYNEARFAR YYBASED_CODE YYDCDECL yymatch[] = {
	0
};

int YYNEAR YYDCDECL yytransitionmax = 226;
YYCONST yytransition_t YYNEARFAR YYBASED_CODE YYDCDECL yytransition[] = {
	{ 0, 0 },
	{ 4, 1 },
	{ 5, 1 },
	{ 4, 4 },
	{ 40, 16 },
	{ 42, 19 },
	{ 16, 16 },
	{ 16, 16 },
	{ 16, 16 },
	{ 16, 16 },
	{ 16, 16 },
	{ 16, 16 },
	{ 16, 16 },
	{ 16, 16 },
	{ 16, 16 },
	{ 16, 16 },
	{ 45, 25 },
	{ 38, 15 },
	{ 43, 20 },
	{ 49, 28 },
	{ 44, 24 },
	{ 0, 8 },
	{ 39, 15 },
	{ 46, 25 },
	{ 4, 1 },
	{ 6, 1 },
	{ 4, 4 },
	{ 50, 28 },
	{ 47, 26 },
	{ 48, 27 },
	{ 7, 1 },
	{ 8, 1 },
	{ 9, 1 },
	{ 10, 1 },
	{ 11, 1 },
	{ 12, 1 },
	{ 13, 1 },
	{ 14, 1 },
	{ 35, 6 },
	{ 15, 1 },
	{ 16, 1 },
	{ 16, 1 },
	{ 16, 1 },
	{ 16, 1 },
	{ 16, 1 },
	{ 16, 1 },
	{ 16, 1 },
	{ 16, 1 },
	{ 16, 1 },
	{ 16, 1 },
	{ 51, 29 },
	{ 17, 1 },
	{ 18, 1 },
	{ 19, 1 },
	{ 20, 1 },
	{ 52, 30 },
	{ 53, 31 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 22, 1 },
	{ 54, 33 },
	{ 23, 1 },
	{ 55, 36 },
	{ 21, 1 },
	{ 56, 37 },
	{ 21, 1 },
	{ 24, 1 },
	{ 25, 1 },
	{ 21, 1 },
	{ 26, 1 },
	{ 27, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 28, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 29, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 30, 1 },
	{ 31, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 21, 1 },
	{ 32, 1 },
	{ 33, 1 },
	{ 34, 1 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 58, 44 },
	{ 59, 45 },
	{ 60, 46 },
	{ 61, 47 },
	{ 62, 48 },
	{ 63, 50 },
	{ 64, 51 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 65, 52 },
	{ 66, 53 },
	{ 67, 55 },
	{ 36, 7 },
	{ 21, 88 },
	{ 68, 58 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 21, 88 },
	{ 57, 57 },
	{ 57, 57 },
	{ 57, 57 },
	{ 57, 57 },
	{ 57, 57 },
	{ 57, 57 },
	{ 57, 57 },
	{ 57, 57 },
	{ 57, 57 },
	{ 57, 57 },
	{ 69, 59 },
	{ 70, 60 },
	{ 71, 61 },
	{ 72, 62 },
	{ 73, 64 },
	{ 74, 65 },
	{ 75, 66 },
	{ 76, 67 },
	{ 77, 68 },
	{ 78, 70 },
	{ 79, 72 },
	{ 80, 73 },
	{ 81, 75 },
	{ 82, 76 },
	{ 83, 78 },
	{ 84, 80 },
	{ 85, 82 },
	{ 86, 83 },
	{ 87, 85 },
	{ 88, 86 },
	{ 89, 87 },
	{ 41, 18 },
	{ 90, 89 }
};

YYCONST yystate_t YYNEARFAR YYBASED_CODE YYDCDECL yystate[] = {
	{ 0, 0, 0 },
	{ -3, -8, 0 },
	{ 1, 0, 0 },
	{ 0, 0, 41 },
	{ 0, -6, 38 },
	{ 0, 0, 37 },
	{ 0, -23, 23 },
	{ 0, 67, 41 },
	{ -37, 11, 41 },
	{ 0, 0, 27 },
	{ 0, 0, 28 },
	{ 0, 0, 13 },
	{ 0, 0, 11 },
	{ 0, 0, 26 },
	{ 0, 0, 12 },
	{ 0, -25, 14 },
	{ 0, -42, 34 },
	{ 0, 0, 25 },
	{ 0, 163, 15 },
	{ 0, -56, 24 },
	{ 0, -43, 17 },
	{ 88, 0, 33 },
	{ 0, 0, 29 },
	{ 0, 0, 30 },
	{ 88, -94, 33 },
	{ 88, -88, 33 },
	{ 88, -80, 33 },
	{ 88, -79, 33 },
	{ 88, -83, 33 },
	{ 88, -51, 33 },
	{ 88, -56, 33 },
	{ 88, -48, 33 },
	{ 0, 0, 31 },
	{ 0, -40, 41 },
	{ 0, 0, 32 },
	{ 0, 0, 20 },
	{ 0, -23, 0 },
	{ 0, 49, 0 },
	{ 0, 0, 40 },
	{ 0, 0, 39 },
	{ 57, 0, 0 },
	{ 0, 0, 16 },
	{ 0, 0, 19 },
	{ 0, 0, 18 },
	{ 88, 27, 33 },
	{ 88, 32, 33 },
	{ 88, 20, 33 },
	{ 88, 16, 33 },
	{ 88, 21, 33 },
	{ 88, 0, 5 },
	{ 88, 17, 33 },
	{ 88, 18, 33 },
	{ 88, 56, 33 },
	{ 88, 57, 33 },
	{ 0, 0, 22 },
	{ 0, 47, 0 },
	{ 0, 0, 36 },
	{ 0, 145, 35 },
	{ 88, 69, 33 },
	{ 88, 89, 33 },
	{ 88, 88, 33 },
	{ 88, 104, 33 },
	{ 88, 109, 33 },
	{ 88, 0, 1 },
	{ 88, 90, 33 },
	{ 88, 108, 33 },
	{ 88, 101, 33 },
	{ 0, 151, 0 },
	{ 88, 104, 33 },
	{ 88, 0, 3 },
	{ 88, 107, 33 },
	{ 88, 0, 6 },
	{ 88, 97, 33 },
	{ 88, 100, 33 },
	{ 88, 0, 4 },
	{ 88, 114, 33 },
	{ 0, 178, 0 },
	{ 88, 0, 9 },
	{ 88, 107, 33 },
	{ 88, 0, 2 },
	{ 88, 108, 33 },
	{ 88, 0, 7 },
	{ 0, 122, 0 },
	{ 88, 103, 33 },
	{ 88, 0, 10 },
	{ 0, 112, 0 },
	{ 88, 121, 33 },
	{ 0, 107, 0 },
	{ 0, 70, 8 },
	{ 0, 166, 0 },
	{ 0, 0, 21 }
};

YYCONST yybackup_t YYNEARFAR YYBASED_CODE YYDCDECL yybackup[] = {
	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
};

#line 96 ".\\scan.l"


///////////////////////////////////////////////////////////////////////////// 
// programs section 

TokenType getToken(void) 
{ 
static int firstTime = TRUE; 
TokenType currentToken; 
if (firstTime) { 
firstTime = FALSE; 
lineno++; 
yyin = source; 
yyout = listing; 
} 
currentToken = yylex(); 
strncpy(tokenString, yytext, MAXTOKENLEN); 
if (TraceScan) { 
lineno = yylineno; 
fprintf(listing,"\t%d: ",lineno); 
printToken(currentToken,tokenString); 
} 
return currentToken; 
}