資源描述:
《PL0源程序-編譯原理實(shí)驗(yàn)代碼.doc》由會(huì)員上傳分享,免費(fèi)在線閱讀,更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。
1、附件1小組成員:程序清單Main.c#include#include#includevoiderror(intn);voidgetsym();//voidenter(enumobjectk,int*ptx,intlev,int*pdx);intposition(char*idt,inttx);intconstdeclaration(int*ptx,intlev,int*pdx);intvardeclaration(int*ptx,intlev,int*pdx);intfacto
2、r(int*ptx,intlev);intterm(int*ptx,intlev);intexpression(int*ptx,intlev);intstatement(int*ptx,intlev);intblock();enumobject{constant,variable,procedure};structtab{charname[14];enumobjectkind;intval;intlevel;intadr;intsize;}table[100];enumsymbol{nul,ident,number,plus,minu
3、s,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,};enumsymbolsym=nul;enumsymbolmulop;enumsymbolwsym[14];enumsymbolssym[256];cha
4、rch='';char*str;charword[14][10]={"begin","call","const","do","end","if","odd","procedure","program","read","then","var","while","write"};//設(shè)置保留字名字intnum;intlev=0;inttx=0;intk;int*mm;//=(int*)malloc(sizeof(int));char*id,sign[14];chara[14];FILE*fp1,*fp2,*fp3;voiderror(in
5、tn){switch(n){case1:printf("常數(shù)說明中的"="寫成了":="。");break;case2:printf("常數(shù)說明中"="后應(yīng)是數(shù)字。");break;case3:printf("常數(shù)說明中的標(biāo)識(shí)符后應(yīng)是"="。");break;case4:printf("program,const,var,procedure后應(yīng)為標(biāo)識(shí)符。");break;case5:printf("漏掉了","或";"。");break;case6:printf("過程說明的符號(hào)不正確。
6、");break;case7:printf("應(yīng)該是語句的開始符。");break;case8:printf("程序體內(nèi)語句部分的后跟符不正確。");break;case9:printf("程序的結(jié)尾丟了句號(hào)"."。");break;case10:printf("語句之間漏了";"。");break;case11:printf("標(biāo)識(shí)符未說明。");break;case12:printf("賦值語句中,賦值號(hào)左部標(biāo)識(shí)符屬性應(yīng)是變量。");break;case13:printf("賦值語句左部標(biāo)識(shí)符后應(yīng)是
7、賦值號(hào)":="。");break;case14:printf("call后應(yīng)為標(biāo)識(shí)符。");break;case15:printf("call后標(biāo)識(shí)符屬性應(yīng)為過程。");break;case16:printf("條件語句中丟了"then"。");break;case17:printf("丟了"end"或";"。");break;case18:printf("while型循環(huán)語句中丟了"do"。");break;case19:printf("語句后的符號(hào)不正確。");break;case2
8、0:printf("應(yīng)為關(guān)系運(yùn)算符。");break;case21:printf("表達(dá)式內(nèi)標(biāo)識(shí)符屬性不能是過程。");break;case22:printf("表達(dá)式中漏掉右括號(hào)")"。");break