【文章內(nèi)容簡介】 門高級語言其實學(xué)起來是很容易的，而在校期間，這些計算機基礎(chǔ)課程一定要學(xué)好！才能為將來打好基礎(chǔ)。源程序清單//************編譯器**********************////**************編譯原理******************//************計算機科學(xué)系****************//*************大當(dāng)家的*******************////*****************************************includeincludeincludeincludechar prog[80]。 //存放所有輸入字符 char token[8]。 //存放詞組 char ch。 //單個字符 int syn,p,m,n,i。 //syn:種別編碼 double sum。 int count。 int isSignal。 //是否帶正負(fù)號(0不帶，1負(fù)號，2正號）int isError。int isDecimal。 //是否是小數(shù) double decimal。 //小數(shù) int isExp。 //是否是指數(shù) int index。 //指數(shù)冪 int isNegative。 //是否帶負(fù)號 double temp。 int temp2。int repeat。 //是否連續(xù)出現(xiàn)+,int nextq。int kk。 //臨時變量的標(biāo)號int ntc,nfc,nnc,nnb,nna。char *rwtab[9]={main,int,float,double,char,if,else,do,while}。 struct{ char result[10]。 //字符串（字符數(shù)組） char arg1[10]。 char opera[10]。 char arg2[10]。}fourCom[20]。 //結(jié)構(gòu)體數(shù)組void scanner()。 //掃描void lrparser()。 void staBlock(int *nChain)。 //語句塊void staString(int *nChain)。 //語句串void sta(int *nChain)。 //語句void fuzhi()。 //賦值語句void tiaojian(int *nChain)。 //條件語句void xunhuan()。 //循環(huán)語句char* E()。 //Expresiion表達式char* T()。 //Term項char* F()。 //Factor因子char *newTemp()。 //自動生成臨時變量void backpatch(int p,int t)。 //回填int merge(int p1,int p2)。 //合并p1和p2void emit(char *res,char *num1,char *op,char *num2)。 //生成四元式void main(){ p=0。 count=0。 isDecimal=0。 index=0。 repeat=0。 kk=0。 printf(\nPlease input your source string:\n)。 do{ ch=getchar()。 prog[p++]=ch。 }while(ch!=39。39。)。 p=0。 isError=0。 scanner()。 lrparser()。 for(i=1。inextq。i++) //循環(huán)輸出四元式 { printf(\n%d\t,i)。 printf((%5s %5s %5s \t%5s )\n,fourCom[i].arg1,fourCom[i].opera,fourCom[i].arg2,fourCom[i].result)。 }}void lrparser(){ int nChain。 nfc=ntc=1。 nextq=1。 if(syn==1) //main { scanner()。 if(syn==26) //( { scanner()。 if(syn==27) //) { scanner()。 staBlock(amp。nChain)。 } else printf(缺少右括號\n)。 } else printf(缺少左括號\n)。 } else printf(缺少main\n)。}//語句塊 ::= 39。{39。語句串39。}39。void staBlock(int *nChain) //語句塊{ if(syn==28) //{ { scanner()。 staString(nChain)。 //backpatch(*nChain,nextq)。 if(syn==29) //} scanner()。 //讀下一個 else printf(缺少}號\n)。 } else printf(缺少{號\n)。}//語句串::=語句{。語句}。void staString(int *nChain) //語句串{ sta(nChain)。 backpatch(*nChain,nextq)。 while(syn==31) //。 { scanner()。 sta(nChain)。 } //backpatch(*nChain,nextq1)。}void sta(int *nChain) //語句{ if(syn==10) { fuzhi()。 //*nChain=0。 } else if(syn==6) //if { tiaojian(nChain)。 } else if(syn==8) //do xunhuan()。}//條件語句if(條件)語句塊void tiaojian(int *nChain){ char res[10],num1[10],num2[10],op[10]。 int nChainTemp。 //條件表達式關(guān)系運算符表達式 if(syn==6) //if { scanner()。 //strcpy(num1,E())。 if(syn==26) //( { scanner()。 strcpy(num1,E())。 if((syn=37)amp。amp。(syn=32)) { switch(syn) { case 32: strcpy(op,)。 break。 case 33: strcpy(op,=)。 break。 case 34: strcpy(op,)。 break。 case 35: strcpy(op,=)。 break。 case 36: strcpy(op,==)。 break。 case 37: strcpy(op,!=)。 break。 default: printf(error)。 } } scanner()。 strcpy(num2,E())。 strcat(num1,op)。 strcat(num1,num2)。 //nfc=nextq+1。 ntc=nextq。 //記住if語句位置 emit(0,if,num1,goto)。 nfc=nextq。 //if中表達式為假 emit(0,goto)。 //第一個0已回填 backpatch(ntc,nextq)。 //ntc鏈接的所有四元式都回填nextq } if(syn==27) //) scanner()。 staBlock(amp。nChainTemp)。 //語句塊 *nChain=merge(nChainTemp,nfc)。 }}//循環(huán)語句::=do 語句塊while 條件void xunhuan(){ char res[10],num1[10],num2[10],op[10]。 int nChainTemp。 if(syn==8) //do { nnc=nextq。 //記住if語句位置，emit之后nextq就變了 //emit(0,if,num1,goto)。 scanner()。 staBlock(amp。nChainTemp)。 //語句塊 if(syn==9) //while { scanner()。 if(syn==26) //( { scanner()。 strcpy(num1,E())。 if((syn=37)amp。amp。(syn=32)) { switch(syn) { case 32: strcpy(op,)。 break。 case 33: strcpy(op,=)。 break。 case 34: s