编译原理课程设计报告 源代码.docVIP

编译原理课程设计报告 （内附完整源代码） 课程名称 编 译 原 理 学生学院 计 算 机 学 院 2008 年 12月 完整源代码： PL0.cpp部分 /*编译和运行环境: *1Visual C++6.0,VisualC++.NET and Visual C++.NET 2003 *WinNT, Win 200, WinXP and Win2003 *2 gcc version 3.3.2 Red Hat Linux 3.3.2-1) *Redhat Fedora core 1 *Intel 32 platform *使用方法: *运行后输入PL/0 源程序文件名 *回答是否输出虚拟机代码 *回答是否输出名字表 *fa.tmp 输出虚拟机代码 *fa1.tmp 输出源文件及其各行对应的首地址 *fa2.tmp 输出结果 *fas.tmp 输出名字表 */ #includestdio.h #includepl0.h #includestring.h #include cstdio /*解释执行时使用的栈*/ #define stacksize 500 int main() { int c; bool nxtlev[symnum]; printf(***************************************************************************\n); printf(***************************************************************************\n); printf(********************* 欢迎使用 程序开始 **********************\n); printf(*********************计算机学院 网络工程 **********************\n); printf(*********************姓名： **********************\n); printf(*********************学号： **********************\n); printf(***************************************************************************\n); printf(Input pl/0 file ?); scanf(%s,fname); /*输入文件名*/ fin=fopen(fname,r); if(fin) { printf(List object code ?(Y/N)); /*是否输出虚拟机代码*/ scanf(%s,fname); listswitch=(fname[0]==y||fname[0]==Y); printf(List symbol table ? (Y/N)); /*是否输出名字表*/ scanf(%s,fname); tableswitch=(fname[0]==y||fname[0]==Y); fa1=fopen(fa1.tmp,w); fprintf(fa1,Iput pl/0 file ?); fprintf(fa1,%s\n, fname); init(); /*初始化*/ err=0; cc=cx=ll=0; ch= ; if(-1!=getsym()) { fa=fopen(fa.tmp,w); fas=fopen(fas.tmp,w); addset(nxtlev,declbegsys,statbegsys,symnum); nxtlev[period]=true; if(-1==block(0,0,nxtlev)) /*调用编译程序*/ { fclose(fa); fclose(fa1); fclose(fas); fclose(fin); printf(\n); return 0; } fclose(