2023年编译原理实验词法分析实验报告

《2023年编译原理实验词法分析实验报告》由会员分享，可在线阅读，更多相关《2023年编译原理实验词法分析实验报告（16页珍藏版）》请在装配图网上搜索。

1、编译技术实验报告 实验题目： 词法分析学 院： 信息学院专 业： 计算机科学与技术学 号： 姓 名： 一、实验目的(1) 理解词法分析的功能；(2) 理解词法分析的实现方法；二、实验内容PL0的文法如下为非终结符。 := 该符号的左部由右部定义，可读作“定义为”。 | 表达或，为左部可由多个右部定义。 表达花括号内的语法成分可以反复。在不加上下界时可反复0到任意次数，有上下界时可反复次数的限制。 表达方括号内的成分为任选项。 ( ) 表达圆括号内的成分优先。 上述符号为“元符号”， 文法用上述符号作为文法符号时需要用引号括起。程序=分程序分程序= 变量说明部分过程说明部分语句变量说明部分=VA

2、R标记符，标记符：INTEGER；无符号整数=数字数字标记符=字母字母|数字过程说明部分=过程首部分程序；过程说明部分；过程首部=PROCEDURE标记符；语句=赋值语句|条件语句|过程调用语句|读语句|写语句|复合语句|空赋值语句=标记符=表达式复合语句=BEGIN语句；语句END条件=表达式关系运算符表达式表达式=项加法运算符项 项=因子乘法运算符因子因子=标记符|无符号整数|(表达式)加法运算符=+|-乘法运算符=*关系运算符=|=|=条件语句=IF条件THEN语句字母=a|b|X|Y|Z数字=0|1|2|8|9实现PL0的词法分析三、实验分析与设计PL0词法分析程序是一个独立的过程，其

3、功能是为语法语义分析提供单词，把输入的字符串形式的源程序分割成一个个单词符号传递给语法语义分析。其重要方法环节为从源程序扫描下一个字符，忽略空格、换行、TAB和注释并辨认单词，再将不同类别的单词归类输出。四、实验的实现#include #include#include#include#include#definenorw 11 /norw-1个关键字#defineal 20 /最长的关键字的长度#define ID norw#define INT norw+1#define COMMA norw+2#define ENDF norw+3#define COLON norw+4#define S

4、EMIC norw+5#define ADD norw+6#define MINUS norw+7#define MULTI norw+8#define EVALU norw+9#define LE norw+10#define NE norw+11#define LT norw+12#define EQ norw+13#define GE norw+14#define GT norw+15#define FLOAT norw+16char TOKEN20; /字符数组用来依次存放单词词文的各个字符extern int lookup(char *); /以TOKEN字符串查保存字表extern

5、 void report_error(char); /报告程序中的词法错误bool isalpha(char); /判断接受字符是否为字母bool isalnum(char); /判断接受字符是否为字母或者数字bool isdigit(char); /判断接受字符是否为数字bool isannotation(char); /判断接受字符是否为注释extern char letter(char c); /用来将大写字母转化成小写字母FILE* fin;FILE* fout;void scanner()/词法分析的主体程序，对输入的文本文献进行词法分析char ch;int i,c;int err

6、or=0; /记录文献中词法错误的个数ch=fgetc(fin); /从输入文献中读取一个字符while(ch!=EOF)/当从输入文献接受的字符不是文献结束符时，执行循环if(isalpha(ch)/假如从输入文献接受的第一个字符是字母 ch=letter(ch);TOKEN0=ch;ch=fgetc(fin);i=1;while(isalnum(ch) ch=letter(ch);TOKENi=ch;i+;ch=fgetc(fin);TOKENi=0;c=lookup(TOKEN); /查保存字表if(c=0) fprintf(fout,(%d,%s)n, ID,TOKEN); /输出标记

7、符else fprintf(fout,(%d,%s)n, c,TOKEN); /输出接受单词为保存字if(isdigit(ch) /假如从输入文献接受的第一个字符是数字 int cdot=0; /记录小数点个数TOKEN0=ch;ch=fgetc(fin);i=1;while(isdigit(ch)|ch=.)/从第二个接受字符开始，当是数字或者是小数点时，执行循环if(ch=.) cdot+;TOKENi=ch;i+;ch=fgetc(fin);/反复接受字符，直到接受到非数字if(cdot=2) error+; TOKENi=0; printf(%s is errorn, TOKEN);

8、break; if(isalpha(ch) /假如第二个字符是字母while(isalpha(ch) /接受完所有的字母，跳出循环TOKENi=ch;i+;ch=fgetc(fin);TOKENi=0;error+;printf(%s is errorn, TOKEN);else if(cdot=0) /当接受的字符为整型单词时fseek(fin,-1,1); TOKENi=0; int a,temp=0,c; for(c=0;ci;c+) a=TOKENc - 0; if(c!=0) temp=temp*10; temp=temp+a; else temp=a; fprintf(fout,(

9、%d,%d)n, INT, temp); /输出接受单词为整数else if(cdot=1) fseek(fin,-1,1); TOKENi=0; int a,part1=0,jc,b=0; /b用来拟定小数点所在的位置 float c=0.1,part2=0.0; while(TOKENb!=.) b=b+1; for(jc=0;jcb;jc+) a=TOKENjc - 0; if(jc!=0) part1=part1*10; part1=part1+a; else part1=a; for(jc=b+1;jci;jc+) a=TOKENjc-0; part2=a*c+part2; c=c*

10、0.1; fprintf(fout,(%d,%f)n, FLOAT, part1+part2); /输出接受单词为小数 else if(cdot=2) fseek(fin,-1,1); else /假如从输入文献接受的第一个字符既不是字母又不是数字switch(ch)/将所接受到的符号字符进行分类，采用一符一类case:ch=fgetc(fin); if(ch=) fprintf(fout,(%d,:=)n, EVALU); /输出接受符号为赋值号 elsech=fgetc(fin);fseek(fin,-1,1); /文献接受字符回推一个字符fprintf(fout,(%d,:)n, COL

11、ON); /输出冒号break;case,:fprintf(fout,(%d,)n, COMMA); break; /输出逗号case.:fprintf(fout,(%d,.)n, ENDF);break; /输出句号case;:fprintf(fout,(%d,.)n, SEMIC);break; /输出分号case+:fprintf(fout,(%d,+)n, ADD);break; /输出加号case-:fprintf(fout,(%d,-)n, MINUS);break; /输出减号case*:fprintf(fout,(%d,*)n, MULTI);break; /输出乘号case:

12、ch=fgetc(fin);if(ch=)fprintf(fout,(%d,)fprintf(fout,(%d,)n, NE); /输出不等于号elsefseek(fin,-1,1);fprintf(fout,(%d,:ch=fgetc(fin);if(ch=)fprintf(fout,(%d,=)n, GE); /输出大于或等于号elsefseek(fin,-1,1);fprintf(fout,(%d,)n, GT); /输出大于号break;case :break;casen:break;caset:break;case/:ch=fgetc(fin);/检查是否为单行注释if(ch=/)w

13、hile(ch!=n) ch=fgetc(fin); else fseek(fin,-1,1); printf(/ is errorn); error+; break; case: while(1) ch=fgetc(fin); if(ch=) break; if(ch=EOF) fseek(fin,-1,1); printf( is errorn); error+; break; break; default:printf(%c is errorn, ch); /接受非上述字符程序报告词法错误error+;break;ch=fgetc(fin); /继续从文献中读取下一个单词，直到文献结束/

14、while循环结束printf(共发现%d 个词法错误!,error);return;int lookup(char *token)int j; char wordnorwal;strcpy(&(word10), begin );strcpy(&(word20), end);strcpy(&(word30), var);strcpy(&(word40), integer);strcpy(&(word50), while);strcpy(&(word60), do);strcpy(&(word70), if);strcpy(&(word80), then);strcpy(&(word90), p

15、rocedure);strcpy(&(word100), else);for(j=1;j=a&c=A&c=a&c=A&c=0&c=0&c=A&c=Z) c=c+32; return c;int main()char filename20;printf(请输入文献名:);scanf(%s,filename);if(fin=fopen(filename,r)=NULL) /打开要读取的文本文献printf(不能打开文献.n);exit(0);printf(请输入保存分析结果的文献名:);scanf(%s,filename);if(fout=fopen(filename,w)=NULL)printf(不能打开文献.n);exit(0);scanner(); /调用词法分析程序/getchar();getchar();fclose(fin);fclose(fout);return 0;五、运营的结果