?? cm_scan.cpp
字號:
#include <lex.h>
#define YYLEXFAST
#line 1 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
#include "globals.h"
#include "util.h"
#include "scan.h"
#include "symtab.h"
char tokenString[MAXTOKENLEN+1];
/* set NO_PARSE to TRUE to get a scanner-only compiler */
#define NO_PARSE FALSE
/* set NO_ANALYZE to TRUE to get a parser-only compiler */
#define NO_ANALYZE FALSE
/* set NO_CODE to TRUE to get a compiler that does not
* generate code
*/
#define NO_CODE FALSE
#include "util.h"
#if NO_PARSE
#include "scan.h"
#else
#include "parse.h"
#if !NO_ANALYZE
#include "analyze.h"
#if !NO_CODE
#include "cgen.h"
#endif
#endif
#endif
/* allocate global variables */
int lineno = 1;
FILE *source;
FILE *listing;
FILE *code;
/* allocate and set tracing flags */
int TraceScan = FALSE;
int TraceParse = FALSE;
int TraceAnalyze = FALSE;
int TraceCode = FALSE;
int Error = FALSE;
#line 52 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
/* repeated because of possible precompiled header */
#include <lex.h>
#define YYLEXFAST
#include "CM_scan.h"
#ifndef YYTEXT_SIZE
#define YYTEXT_SIZE 100
#endif
#ifndef YYUNPUT_SIZE
#define YYUNPUT_SIZE YYTEXT_SIZE
#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);
/* 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);
/* 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 yylexaction(int action)
#else
int YYCDECL yylexaction(action)
int action;
#endif
{
yyreturnflg = 1;
switch (action) {
case 1:
{
#line 57 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return INT;
#line 156 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 2:
{
#line 58 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return CHAR;
#line 163 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 3:
{
#line 59 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return FLOAT;
#line 170 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 4:
{
#line 60 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return VOID;
#line 177 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 5:
{
#line 61 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return IF;
#line 184 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 6:
{
#line 62 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return ELSE;
#line 191 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 7:
{
#line 63 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return WHILE;
#line 198 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 8:
{
#line 64 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return FOR;
#line 205 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 9:
{
#line 65 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return RETURN;
#line 212 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 10:
{
#line 66 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return EQ;
#line 219 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 11:
{
#line 67 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return LE;
#line 226 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 12:
{
#line 68 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return GE;
#line 233 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 13:
{
#line 69 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return NE;
#line 240 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 14:
{
#line 70 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return ASSIGN;
#line 247 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 15:
{
#line 71 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return LT;
#line 254 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 16:
{
#line 72 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return GT;
#line 261 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 17:
{
#line 73 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return PLUS;
#line 268 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 18:
{
#line 74 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return MINUS;
#line 275 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 19:
{
#line 75 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return TIMES;
#line 282 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 20:
{
#line 76 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return OVER;
#line 289 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 21:
{
#line 77 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return SEMICOLON;
#line 296 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 22:
{
#line 78 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return COMMA;
#line 303 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 23:
{
#line 79 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return LPAREN;
#line 310 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 24:
{
#line 80 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return RPAREN;
#line 317 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 25:
{
#line 81 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return LBRACKET;
#line 324 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 26:
{
#line 82 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return RBRACKET;
#line 331 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 27:
{
#line 83 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return LBRACE;
#line 338 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 28:
{
#line 84 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return RBRACE;
#line 345 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 29:
{
#line 85 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return OR;
#line 352 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 30:
{
#line 86 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return AND;
#line 359 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 31:
{
#line 87 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return NOT;
#line 366 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 32:
{
#line 88 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
char c;
LABEL:
do
{
c = input();
if( c == '\n')
lineno++;
}while(c != '*');
do
{
c = input();
if(c == '/')
break;
if( c == '\n')
lineno++;
if(c != '*')
goto LABEL;
}while(c == '*');
#line 393 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 33:
{
#line 109 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
strncpy(tokenString,yytext,MAXTOKENLEN); return ID;
#line 400 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 34:
{
#line 110 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
strncpy(tokenString,yytext,MAXTOKENLEN); return NUM;
#line 407 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 35:
{
#line 111 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
strncpy(tokenString,yytext,MAXTOKENLEN); return FLOATNUM;
#line 414 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 36:
{
#line 112 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
strncpy(tokenString,yytext,MAXTOKENLEN); return CONSTCHAR;
#line 421 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 37:
{
#line 113 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
lineno++;
#line 428 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 38:
{
#line 114 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
/* skip whitespace */
#line 435 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
case 39:
{
#line 115 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
return ERROR;
#line 442 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.c"
}
break;
default:
yyassert(0);
break;
}
yyreturnflg = 0;
return 0;
}
#ifndef YYNBORLANDWARN
#ifdef __BORLANDC__
#pragma warn .rch /* <warning: unreachable code> to the old state */
#endif
#endif
#line 117 "E:\\Myworks\\Compiler\\C_Minus\\CM_scan.l"
int main( int argc, char * argv[] )
{
TreeNode * syntaxTree;
char pgm[120]; /* source code file name */
if (argc != 2 && argc != 3)
{
fprintf(stderr, "usage: CMinusC <filename>\n");
exit(1);
}
if(argc == 3)
{
if(strpbrk(argv[2], "S") != 0)
TraceScan = TRUE;
if(strpbrk(argv[2], "P") != 0)
TraceParse = TRUE;
if(strpbrk(argv[2], "A") != 0)
TraceAnalyze = TRUE;
if(strpbrk(argv[2], "C") != 0)
TraceCode = TRUE;
}
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -