编译原理课程设计实验报告1.docx

中国海洋大学实验报告姓名：邓汇星 专业年级：2012级计算机学号：12020031016同组人： 窦猛 专业年级：2012级计算机 学号：12020031020编译原理课程设计实验报告【实验题目】：实验1：用Lex设计词法分析器1【实验目的】：学会用lex设计一个词法分析器。【实验内容】：使用lex为下述文法语言写一个词法分析器。语言文法： PROGRAM ; BEGIN END. VAR ;: | : ; INTEGER | REAL | , | ; | | | := IF THEN ELSE WHILE DO BEGIN END | + | - | * | / | | () | | | | . | . | | =| A | B | | X | Y | Z | a | b | | x | y | z0|1|2|9【实验要求】：输入为用该语言所写的源程序文件；输出为记号序列，每个记号显示为二元组(记号名，记号属性值)的形式。输出可以在屏幕上，也可以输出到文件中。不要求建立符号表。在cygwin下用flex和gcc工具将实验调试通过，并能通过例子parser0中testcases目录下的test1.p测试例的测试。【实验参考】：exam1.l和exam2.l。请认真阅读例子，发现错误及时提出。【实验过程】：根据编译原理实验的exam1.l和exam2.l的代码进行修改，添加对一些符号的定义，设计成为一个新的此法分析器，使得改词法分析器能够对实验要求的记号进行识别，识别效果如下：PROGRAM test;VAR i, j, k: INTEGER; f0: REAL;BEGIN i := 1; j := 1; k := 0; f0 := 3.2; WHILE k=100 DO BEGIN IF j 20 THEN BEGIN j := i; k := k+1; f0 := f0*0.2 END ELSE BEGIN j := k; k := k-2; f0 := f0/.2 END ENDEND.【实验结果截图】；程序用flex和gcc编译调试通过后，以test1.p中的内容座位输入进行词法分析得到以下结果：test1.p的内容如下：PROGRAM test;VAR i, j, k: INTEGER; f0: REAL;BEGIN i := 1; j := 1; k := 0; f0 := 3.2; WHILE k=100 DO BEGIN IF j 20 THEN BEGIN j := i; k := k+1; f0 := f0*0.2 END ELSE BEGIN j := k; k := k-2; f0 := f0/.2 END ENDEND.【实验程序代码】/* 把讨厌的注释去掉 */%#include #define LT1#defineLE2#define GT3#defineGE4#defineEQ5#define NE6#define WHILE18#defineDO19#define ID 20#define NUMBER 21#define RELOP 22#define NEWLINE 23#define ERRORCHAR 24#define _PROGRAM 25#define _VAR 26#define _INTEGER 27#define _REAL 28#define _END 29#define _THEN 30#define fenhao 31#define maohao 32#define douhao 33#define jiahao 34#define chuhao 35#define dian 36#define chenghao 37#define jianhao 38#define _BEGIN 39#define _ELSE 40% delim t nwsdelim+letterA-Za-zdigit0-9idletter(letter|digit)*numberdigit+(.digit+)?(E+-?digit+)?/* 状态（或条件）定义可以定义在这里 * INITIAL是一个默认的状态，不需要定义 */%s COMMENT%/*BEGIN COMMENT;ECHO;*/BEGIN INITIAL;ECHO;.|nECHO; /* ECHO是一个宏，相当于 fprintf(yyout, %s, yytext)*/ws ;whilereturn (WHILE);WHILEreturn(WHILE);do return (DO);ELSEreturn(_ELSE);PROGRAM return (_PROGRAM);BEGINreturn (_BEGIN);VAR return (_VAR);INTEGER return (_INTEGER);END return (_END);REAL return (_REAL);THEN return (_THEN);number return (NUMBER);id return (ID); return (RELOP);= return (RELOP);= return (RELOP); return (RELOP); return (RELOP);= return (RELOP);:= return (RELOP);return (fenhao);, return (douhao);: return (maohao);+ return (jiahao);- return (jianhao);* return (chenghao);/ return (chuhao);. return (dian);. return ERRORCHAR; %int yywrap () return 1;void writeout(int c) switch(c) case ERRORCHAR: fprintf(yyout, (ERRORCHAR, %s) , yytext);break; case RELOP: fprintf(yyout, (RELOP, %s) , yytext);break; case WHILE: fprintf(yyout, (WHILE, %s) , yytext);break; case DO: fprintf(yyout, (DO, %s) , yytext);break; case NUMBER: fprintf(yyout, (NUM, %s) , yytext);break; case ID: fprintf(yyout, (ID, %s) , yytext);break; case NEWLINE: fprintf(yyout, n);break;case _PROGRAM: fprintf(yyout,(PROGRAM);break; case _BEGIN: fprintf(yyout,(BEGIN);break;case _VAR: fprintf(yyout, (VAR), yytext); break;case _INTEGER: fprintf(yyout, (INTEGER), yytext); break;case _REAL: fprintf(yyout, (REAL), yytext); break;case _END: fprintf(yyout, (END), yytext); break;case _THEN: fprintf(yyout, (THEN), yytext); break;case maohao:fprintf(yyout, (maohao), yytext); break;case fenhao: fprintf(yyout, (fenhao), yytext); break;case douhao: fprintf(yyout, (douhao), yytext); break;case jiahao: fprintf(yyout, (jiahao), yytext); break;case chuhao: fprintf(yyout, (chuhao), yytext); break;case dian: fprintf(yyout, (dian), yytext); break;case chenghao: fprintf(yyout, (chenghao), yytext); break;case janhao: fprintf(yyout, (janhao), yytext); break;case _ELSE: fprintf(yyout, (ELSE), yytext); break; default:break; fprintf(yyout, n); return;int main (int argc, char * argv)int c,j=0;if (argc=2) if (yyin = fopen(argv1, r) = NULL) printf(Cant open file %sn, argv1); return 1; if (argc=3) yyout=fopen(argv2, w); while (c = yylex()writeout(c);j+;if (j%5 = 0) writeo