pl0源程序编译原理实验代码.docVIP

附件1 小组成员： 程序清单 Main.c #includestdio.h #includestdlib.h #includestring.h void error(int n); void getsym(); //void enter(enum object k,int *ptx,int lev,int *pdx); int position(char*idt,int tx); int constdeclaration(int *ptx,int lev,int *pdx); int vardeclaration(int *ptx,int lev,int *pdx); int factor(int*ptx,int lev); int term(int *ptx,int lev); int expression(int *ptx,int lev); int statement(int *ptx,int lev); int block(); enum object{constant,variable,procedure}; struct tab{char name[14]; enum object kind; int val; int level; int adr; int size; }table[100]; enum symbol{ nul,ident,number,plus,minus,times,slash,oddsym,eql,neq,lss,leq,gtr,geq,lparen,rparen,comma,semicolon, period,becomes,beginsym,endsym,ifsym,thensym,whilesym,writesym,readsym,dosym,callsym,constsym,varsym, procsym,progsym,}; enum symbol sym=nul; enum symbol mulop; enum symbol wsym[14]; enum symbol ssym[256]; char ch= ; char *str; char word[14][10]={begin,call,const,do,end,if,odd,procedure,program,read,then,var,while,write};//设置保留字名字 int num; int lev=0; int tx=0; int k; int *mm; //=(int *)malloc(sizeof(int)); char *id,sign[14]; char a[14]; FILE *fp1,*fp2,*fp3; void error(int n){ switch(n){ case 1:printf(常数说明中的\=\写成了\:=\。\n); break; case 2:printf(常数说明中\=\后应是数字。\n); break; case 3:printf(常数说明中的标识符后应是\=\。\n); break; case 4:printf(program,const,var,procedure后应为标识符。\n); break; case 5:printf(漏掉了\,\或\;\。\n); break; case 6:printf(过程说明的符号不正确。\n); break; case 7:printf(应该是语句的开始符。\n); break; case 8:printf(程序体内语句部分的后跟符不正确。\n); break; case 9:printf(程序的结尾丢了句号\.\。\n); break; case 10:printf(语句之间漏了\;\。\n); break; case 11:printf(标识符未说明。\n); break; case 12:printf(赋值语句中，赋值号左部标识符属性应是变量。\n); break; case 13:printf(赋值语句左部标识符后应是赋值号\:=\。\n); break; case 14:printf(call后应为标识符。\n); break; case 15:printf(call后标识符属性应为过