南昌大学编译原理实验报告一.docx

南昌大学实验报告一实验类型：验证 综合设计 创新 实验日期：2013.4 实验成绩： 词法分析程序设计一、实验目的掌握计算机语言的词法分析程序的开发方法。二、实验内容编制一个能够分析三种整数、标识符、主要运算符和主要关键字的词法分析程序。三、实验要求1、根据状态图，设计词法分析函数int scan( )，完成以下功能：1） 从文本文件中读入测试源代码，根据状态转换图，分析出一个单词，2） 以二元式形式输出单词其中单词种类用整数表示：0：标识符1：十进制整数2：八进制整数3：十六进制整数运算符和界符，关键字采用一字一符，不编码其中单词属性表示如下：标识符，整数由于采用一类一符，属性用单词表示运算符和界符，关键字采用一字一符，属性为空2、编写测试程序，反复调用函数scan( )，输出单词种别和属性。四、实验环境PC微机DOS操作系统或 Windows 操作系统Turbo C 程序集成环境或 Visual C+ 程序集成环境五、实验步骤编辑一个文本文件program.txt，在文件中输入如下内容：if data+920x3f thendata=data+01;elsedata=data-01; 正确结果： , -【实验代码】#include #includeusing namespace std;#define MAX 5 char ch = ;string key5=if,then,else,while,do;int Iskey(string c) /关键字判断 int i; for(i=0;iMAX;i+) if(pare(c)=0) return 1; return 0;int IsLetter(char c) /判断是否为字母 if(c=a)|(c=A) return 1; else return 0;int IsLetter1(char c) /判断是否为af字母 if(c=a)|(c=A) return 1; else return 0;int IsDigit(char c) /判断是否为数字 if(c=0&c=9) return 1; else return 0;void scan(FILE *fpin) string arr=; while(ch=fgetc(fpin)!=EOF) arr=; if(ch= |ch=t|ch=n) else if(IsLetter(ch)|ch=_) arr=arr+ch; ch=fgetc(fpin); while(IsLetter(ch)|IsDigit(ch) if(ch=A) ch=ch+32; arr=arr+ch; ch=fgetc(fpin); fseek(fpin,-1L,SEEK_CUR); if (Iskey(arr)coutarrt$关键字endl; else coutarrt$普通标识符=0&ch=0&ch=7) flag=1; arr=arr+ch; ch=fgetc(fpin);else if(ch=x|ch=X)flag=2;arr=arr+ch; ch=fgetc(fpin);while(IsDigit(ch)|IsLetter1(ch) arr=arr+ch; ch=fgetc(fpin);else if(ch= |ch=,|ch=; )coutarrt$整数0endl;fseek(fpin,-1L,SEEK_CUR); if(flag=1) coutarrt$八进制整数endl;else if(flag=2) coutarrt$十六进制整数endl; else arr=arr+ch;ch=fgetc(fpin);while(IsDigit(ch) arr=arr+ch; ch=fgetc(fpin); fseek(fpin,-1L,SEEK_CUR); coutarrt$十进制整数endl; else switch(ch) case+: case- : case* : case= : case/ :coutcht$运算符endl;break; case( : case) : case : case : case; : case. : case, : case : case :coutcht$界符endl;break; case: :ch=fgetc(fpin); if(ch=) cout:=t$运算符endl; else cout:t$界符 :ch=fgetc(fpin); if(ch=) cout=t$运算符)coutt$输入控制符endl; else coutt$运算符endl; fseek(fpin,-1L,SEEK_CUR); break; case :ch=fgetc(fpin); if(ch=)cout=t$运算符endl; else if(ch=)coutt$输出控制符) coutt$运算符endl; elsecoutt$运算符endl; fseek(fpin,-1L,SEEK_CUR); break; default : coutcht$无法识别字符endl; void main() char in_fn30; FILE * fpin; coutin_fn; if(fpin=fopen(in_fn,r