編譯原理課程設(shè)計-- pl0語言的擴(kuò)充

上傳人：奔*** IP屬地：河北更新時間：2024-03-01 格式：doc 頁數(shù)：29 大?。?43.50KB 人氣指數(shù)：12 舉報 版權(quán)申訴

已閱讀1頁，還剩28頁未讀，繼續(xù)免費閱讀

版權(quán)說明：本文檔由用戶提供并上傳，收益歸屬內(nèi)容提供方，若內(nèi)容存在侵權(quán)，請進(jìn)行舉報或認(rèn)領(lǐng)

文檔簡介

1、　　《編譯原理課程設(shè)計》　　項目名稱 PL/0語言的擴(kuò)充 　　學(xué) 院計算機(jī)學(xué)院 　　專業(yè)班級 　　學(xué) 號

2、　　姓名 　　指導(dǎo)教師 　　2013 年 1 月 3 日　　一．課程設(shè)計目的0　　二．課程設(shè)計要求0

3、;　　基本內(nèi)容：0　　選做內(nèi)容：0　　已實現(xiàn)的功能：0　　三．編譯環(huán)境與工具0　　四．結(jié)構(gòu)設(shè)計說明0　　1．PL/0編譯

4、程序的結(jié)構(gòu)圖0　　2．PL/0編譯程序的過程或函數(shù)的功能表1　　3．PL/0編譯程序的總體流程圖1　　4．PL/0編譯程序的中間代碼2　　5．PL\0的編譯程序的過程和函數(shù)的功能3　　五．課程設(shè)計的設(shè)計與步驟3<

5、;/p>　　1．?dāng)U充賦值運算：+= -= *= /= ++ 和- -5　　2．增加Pascal的FOR語句15　　3．一維數(shù)組17　　六．調(diào)試測試19　　1.+= -= *= /= ++ --

6、的測試19　　2.FOR語句的測試21　　3.數(shù)組的調(diào)試22　　4．綜合調(diào)試23　　七．課程設(shè)計總結(jié)25　　【參考文獻(xiàn)】26</p&g

7、t;　　課程設(shè)計目的　　在分析理解一個教學(xué)型編譯程序（如PL/0）的基礎(chǔ)上，對其詞法分析程序、語法分析程序和語義處理程序進(jìn)行部分修改擴(kuò)充。達(dá)到進(jìn)一步了解程序編譯過程的基本原理和基本實現(xiàn)方法的目的。　　課程設(shè)計要求&l

8、t;b>　　基本內(nèi)容：　?。?）擴(kuò)充賦值運算：*= 和 /=　?。?）擴(kuò)充語句（Pascal的FOR語句）:　?、貴OR <變量>:=<表達(dá)式> TO <表達(dá)式> DO <語句>　　②FOR <

9、;變量>:=<表達(dá)式> DOWNTO <表達(dá)式> DO <語句>　　其中，語句①的循環(huán)變量的步長為2，語句②的循環(huán)變量的步長為-2。　　（3）增加運算：++ 和 --。　　選做內(nèi)容：　?。?）

10、增加類型：① 字符類型；② 實數(shù)類型。　?。?）擴(kuò)充函數(shù)：① 有返回值和返回語句；② 有參數(shù)函數(shù)。　　（3）增加一維數(shù)組類型（可增加指令）。　?。?）其他典型語言設(shè)施。　　已實現(xiàn)的功能：　　（

11、1）擴(kuò)充賦值運算：*=和 /= (另外也擴(kuò)充了+= 和 -=)　?。?）擴(kuò)充語句（Pascal的FOR語句）:　?、貴OR <變量>:=<表達(dá)式> TO <表達(dá)式> DO <語句>　?、贔OR <變量>:=<表達(dá)式> DOWNTO <表

12、達(dá)式> DO <語句>　?。?）增加運算：++ 和 --。　?。?）增加一維數(shù)組類型（可增加指令）。　　編譯環(huán)境與工具　　編譯環(huán)境：Microsoft Windows 7 （64bit）<

13、;p>　　編譯工具：Microsoft Visual C++ 6.0　　結(jié)構(gòu)設(shè)計說明　　1．PL/0編譯程序的結(jié)構(gòu)圖　　2．PL/0編譯程序的過程或函數(shù)的功能表　　表4-1 PL/0編譯程序的過程或函數(shù)的功能表</p&g

14、t;　　3．PL/0編譯程序的總體流程圖　　圖4-2 PL/0編譯程序的總體流程圖　　4．PL/0編譯程序的中間代碼　　對PL/0編譯程序的目標(biāo)代碼的指令格式描述如下：　　f l a

15、　　其中f代表功能碼，l表示層次差，a的含意對不同的指令有所區(qū)別，見下面對每條指令的解釋說明：　　表4-2 PL/0編譯程序的目標(biāo)指令　　5．PL\0的編譯程序的過程和函數(shù)的功能　　Pl0：主程序　　Error：出

16、錯處理，打印出錯位置和錯誤編碼　　Getsym：詞法分析，讀取一個單詞　　Getch：漏掉空格，讀取一個字符　　Gen：生成目標(biāo)代碼，并送入目標(biāo)程序區(qū)　　Test：測試當(dāng)前單詞符號是否合法　　Block：分程序分析處理過程<

17、/p>　　Enter：登陸名字表　　Position：查找標(biāo)識符在名字表中的位置　　Constdeclaration：常量定義處理　　Vardeclaration：變量說明處理　　Listcode：列出目標(biāo)代碼清單<

18、;p>　　Statement：語句部分處理　　Expression：表達(dá)式處理　　Term：項處理　　Factor：因子處理　　Condition：條件處理　　Interpret：對目標(biāo)

19、代碼的解釋執(zhí)行程序　　Base：通過靜態(tài)鏈求出數(shù)據(jù)區(qū)的基地址　　課程設(shè)計的設(shè)計與步驟　　本次課程設(shè)計是在實驗的基礎(chǔ)上，在實驗中，已經(jīng)實現(xiàn)對PL/0作以下修改擴(kuò)充：　?。?）增加單詞：保留字 ELSE，F(xiàn)OR，STEP，UNTIL，RETURN &l

20、t;p>　　運算符 +=，-=，++，--，∧，∨，┓　　（2）修改單詞：不等號# 改為 <>　　（3）增加條件語句的ELSE子句　　在課程設(shè)計中，因為關(guān)鍵字增加到了18個，所以令 # define norw 18。SYMBOL擴(kuò)展為48個值。在pl0.h中做了如下更改，具體如下（粗體部分為課程

21、設(shè)計更改部分）：　　enum symbol{　　nul, ident, number, plus, minus,　　times, slash, oddsym, eql, neq,　　lss, leq, g

22、tr, geq, lparen,　　rparen, comma, semicolon,period, becomes,　　beginsym, endsym, ifsym, thensym, whilesym,　　writesym, readsym, dosym, callsym

23、, constsym,　　varsym, procsym, elsesym, forsym, stepsym, untilsym, returnsym,　　plusbecomes, dplus, minusbecomes, dminus, and, or, not,lepa,ripa,　　slashbecom

24、es,timesbecomes,　　};　　#define symnum 48 　　符號和關(guān)鍵字?jǐn)U展（粗體部分為課程設(shè)計更改部分）：　　ssym['+']=plus;　　ssy

25、m['-']=minus;　　ssym['*']=times;　　ssym['/']=slash;　　ssym['(']=lparen;　　ssym[')']=rparen;

26、;　　ssym['=']=eql;　　ssym[',']=comma;　　ssym['.']=period;　　//ssym['#']=neq; 去掉#，改為<>　　ssym

27、[';']=semicolon;　　ssym['!']=not; //非　　ssym['[']=lepa;//一維數(shù)組的左括號[　　ssym[']']=ripa;//一維數(shù)組的右括號]　　/*設(shè)置保留字名字

28、,按照字母順序,便于折半查找*/　　strcpy(&(word[0][0]),"begin");　　strcpy(&(word[1][0]),"call");　　strcpy(&(word[2][0]),"const");<

29、/p>　　strcpy(&(word[3][0]),"do");　　strcpy(&(word[4][0]),"else");　　strcpy(&(word[5][0]),"end");　　strcpy

30、(&(word[6][0]),"for");　　strcpy(&(word[7][0]),"if");　　strcpy(&(word[8][0]),"odd");　　strcpy(&(word[9][0]),"p

31、rocedure");　　strcpy(&(word[10][0]),"read");　　strcpy(&(word[11][0]),"return");　　strcpy(&(word[12][0]),"step");&

32、lt;/p>　　strcpy(&(word[13][0]),"then");　　strcpy(&(word[14][0]),"until");　　strcpy(&(word[15][0]),"var");

33、;　　strcpy(&(word[16][0]),"while");　　strcpy(&(word[17][0]),"write");　　/*設(shè)置保留字符號*/　　wsym[0]=beginsym;　　wsym[1]

34、=callsym;　　wsym[2]=constsym;　　wsym[3]=dosym;　　wsym[4]=elsesym;　　wsym[5]=endsym;　　wsym[6]=forsym;<p&g

35、t;　　wsym[7]=ifsym;　　wsym[8]=oddsym;　　wsym[9]=procsym;　　wsym[10]=readsym;　　wsym[11]=returnsym; 　　wsym[12]=stepsym;&l

36、t;/p>　　wsym[13]=thensym;　　wsym[14]=untilsym;　　wsym[15]=varsym;　　wsym[16]=whilesym;　　wsym[17]=writesym;

37、;　　設(shè)置指令名稱（粗體部分為課程設(shè)計更改部分）：　　strcpy(&(mnemonic[lit][0]),"lit");　　strcpy(&(mnemonic[opr][0]),"opr");　　strcpy(&(mnemonic[lod][0])

38、,"lod");　　strcpy(&(mnemonic[sto][0]),"sto");　　strcpy(&(mnemonic[cal][0]),"cal");　　strcpy(&(mnemonic[inte][0]),"

39、;int");　　strcpy(&(mnemonic[jmp][0]),"jmp");　　strcpy(&(mnemonic[jpc][0]),"jpc");　　strcpy(&(mnemonic[gar][0]),"gar&qu

40、ot;);　　strcpy(&(mnemonic[sar][0]),"sar");　　strcpy(&(mnemonic[shd][0]),"shd");　　strcpy(&(mnemonic[del][0]),"del");&l

41、t;/p>　　strcpy(&(mnemonic[jud][0]),"jud");　　strcpy(&(mnemonic[tra][0]),"tra");　　1．?dāng)U充賦值運算：+= -= *= /= ++ 和- -　　1）在s

42、ymbol增加字符：　　Plusbecomes：+=　　Minusbecomes：-=　　Slashbecomes：*=　　Timesbecomes：/=　　2）對取字符getsym()函數(shù)進(jìn)行擴(kuò)充，具體如下（粗體部分為更改部分）

43、：　　int getsym()　　{　　...//此處省略部分未修改過的代碼　　else if(ch=='+') //讀到加號　　{&l

44、t;/p>　　getchdo; //再讀一個字符　　if(ch=='=') //讀到等號，則與+號構(gòu)成加等　　{　　sym=plusbecomes;　　getchdo;&

45、lt;/b>　　}　　else if(ch=='+') //讀到加號，則與加號構(gòu)成++　　{　　sym=dplus;　　getchd

46、o; 　　}　　else　　{　　sym=plus; //那就是一個單獨的加號　　}</b

47、>　　}　　else if(ch=='-') //讀到減號　　{　　getchdo;　　if

48、(ch=='=') //讀到等號，則與減號構(gòu)成減等　　{　　sym=minusbecomes;　　getchdo;　　}

49、;　　else if(ch=='-') //讀到減號，則與減號構(gòu)成--　　{　　sym=dminus;　　getchdo;　　}</

50、b>　　else　　{　　sym=minus; //那就是一個單獨的減號　　}　　}<

51、/b>　　else if(ch=='*') 　　{　　getchdo;　　if(ch=='=') //讀到乘號，則與減號構(gòu)成乘等&

52、lt;p>　　{　　sym=timesbecomes;　　getchdo;　　}　　else

53、　　{　　sym=times; //那就是一個單獨的乘　　}　　}　　else if(ch=='/')

54、;　　{　　getchdo;　　if(ch=='=') //讀到乘號，則與減號構(gòu)成除等　　{　　sym=slashb

55、ecomes;　　getchdo;　　}　　else　　{　　sym=slas

56、h; //那就是一個單獨的除　　}　　}　　...//此處省略部分未修改過的代碼　　}　　3)對statemen函數(shù)

57、進(jìn)行擴(kuò)展　　int statement(bool* fsys,int * ptx,int lev)　　{　　...//此處省略部分未修改過的代碼　　if(sym==ident)

58、;　　{　　i=position(id,*ptx);　　if(i==0)　　{　　error(11);　　}<

59、/b>　　else　　{　　if(table[i].kind!=variable&&table[i].kind!=array)　　{&l

60、t;/p>　　error(12);　　i=0;　　}　　else　　{

61、　　getsymdo;　　if(sym==lepa)//如果是數(shù)組　　{　　getsymdo; //處理[]里的表達(dá)式　　memcpy(nxtlev,fsys,sizeof(b

62、ool)* symnum);　　nxtlev[ripa]=true;　　expressiondo(nxtlev,ptx,lev);　　gendo(tra,0,table[i].size);//生成將數(shù)組下標(biāo)范圍入棧指令　　gendo(jud,0,0);//判斷下標(biāo)合法性&

63、lt;/p>　　if(sym!=ripa)　　{　　error(26);　　}　　getsymdo;<

64、;p>　　}　　if(sym==becomes)//賦值:=　　{　　getsymdo;　　flag=1;<

65、/p>　　}　　else if(sym==plusbecomes)//加賦值+=　　{　　getsymdo;

66、flag=2;　　}　　else if(sym==minusbecomes)//減賦值-=　　{　　getsymdo;

67、　　flag=3;　　}　　else if(sym==dplus)//++　　{　　getsymdo;</b&g

68、t;　　flag=4;　　}　　else if(sym==dminus)//--　　{　　gets

69、ymdo;　　flag=5;　　}　　else if(sym==timesbecomes)//*=　　{<p

70、>　　getsymdo;　　flag=6;　　}　　else if(sym==slashbecomes)// /=　　{</b&

71、gt;　　getsymdo;　　flag=7;　　}　　else<b&g

72、t;　　{　　error(13);　　}　　if(i!=0)　　{　　if(flag==1) /

73、/:=　　{　　memcpy(nxtlev,fsys,sizeof(bool)* symnum);　　expressiondo(nxtlev,ptx,lev);　　}<

74、;p>　　else if(flag==2)//+=　　{　　memcpy(nxtlev,fsys,sizeof(bool)* symnum);　　expressiondo(nxtlev,ptx,lev);　　gendo(lod,

75、lev-table[i].level,table[i].adr);//先取值到棧頂　　gendo(opr,lev-table[i].level,2);//執(zhí)行加法　　}　　else if(i!=0&&flag==3)//-=<p&

76、gt;　　{　　memcpy(nxtlev,fsys,sizeof(bool)* symnum);　　expressiondo(nxtlev,ptx,lev);　　gendo(lod,lev-table[i].level,table[i].adr);//先取值到棧頂</

77、p>　　gendo(opr,lev-table[i].level,3);//執(zhí)行減法　　gendo(opr,lev-table[i].level,1);//取反　　}　　else if(i!=0&&flag==4) //++<

78、/p>　　{　　if(table[i].kind==variable)　　{　　gendo(lod,lev-table[i].level,table[i].adr);//先取值到棧頂&l

79、t;p>　　gendo(lit,lev-table[i].level,1);//將值為1入棧　　gendo(opr,lev-table[i].level,2);//加法，即加1　　}　　if(table[i].kind==array)<p&

80、gt;　　{　　gendo(gar,lev-table[i].level,table[i].adr);　　gendo(lit,lev-table[i].level,1);　　gendo(opr,lev-table[i].level,2);<p&g

81、t;　　}　　}　　else if(i!=0&&flag==5)//--　　{　　if(table[i].kind==variable)<

82、;/p>　　{　　gendo(lod,lev-table[i].level,table[i].adr);//先取值到棧頂　　gendo(lit,lev-table[i].level,1);//將值為1入棧　　gendo(opr,lev-table[

83、i].level,3);//減法，即-1　　}　　if(table[i].kind==array)　　{　　gendo(gar,lev-table[i].level,table[i].adr);&

84、lt;/p>　　gendo(lit,lev-table[i].level,1);　　gendo(opr,lev-table[i].level,3);　　}　　}　　el

85、se if(i!=0&&flag==6)//*=　　{　　memcpy(nxtlev,fsys,sizeof(bool)* symnum);　　expressiondo(nxtlev,ptx,lev);　　gendo(

86、lod,lev-table[i].level,table[i].adr);//先取值到棧頂　　gendo(opr,lev-table[i].level,4);//乘法　　}　　else if(i!=0&&flag==7) // /=;&

87、lt;p>　　{　　gendo(lod,lev-table[i].level,table[i].adr);//先取值到棧頂　　memcpy(nxtlev,fsys,sizeof(bool)* symnum);　　expressiondo(nxtlev,ptx,lev);

88、　　gendo(opr,lev-table[i].level,5);//除法　　}　　if(table[i].kind==array) //數(shù)組，根據(jù)偏移地址存入數(shù)組　　{

89、　　gendo(sar,lev-table[i].level,table[i].adr);　　gendo(del,0,0);//賦值語句需將存入數(shù)組后棧頂為偏移地址出棧　　}　　else //變量

90、　　{　　gendo(sto,lev-table[i].level,table[i].adr); //根據(jù)變量地址存入變量　　}　　}　　}

91、;　　}　　}　　else if(sym==dplus) //++變量　　{　　getsymdo;

92、　　if(sym==ident)//后面跟的是變量　　{　　i=position(id,*ptx);　　if(i==0)<b&g

93、t;　　{　　error(11);　　}　　else　　{　　if(table[i].kind!

94、=variable&&table[i].kind!=array) //++后沒跟變量，出錯　　{　　error(12);i=0;　　}　　else //++后跟變量，處理生成中間代

95、碼　　{　　if(table[i].kind==variable)　　{　　gendo(lod,lev-table[i].level,table[i].adr);//先取值到棧頂

96、;　　gendo(lit,0,1);//將值為1入棧　　gendo(opr,0,2);//加法，即+1，棧頂加次棧頂　　gendo(sto,lev-table[i].level,table[i].adr);//出棧取值到內(nèi)存　　getsymdo;<

97、/p>　　}　　else if(table[i].kind==array) //后跟數(shù)組　　{　　getsymdo;　　if(sy

98、m==lepa)　　{　　getsymdo;　　memcpy(nxtlev,fsys,sizeof(bool)* symnum);　　nxtlev[ripa]=true;&

99、lt;p>　　expressiondo(nxtlev,ptx,lev);　　gendo(tra,0,table[i].size); //生成將數(shù)組下標(biāo)范圍入棧指令　　gendo(jud,0,0); //判斷下標(biāo)合法性　　if(sym!=ripa)

100、　{　　error(26); //缺少]　　}　　else　　{　　gendo(gar,lev-

101、table[i].level,table[i].adr);　　gendo(lit,0,1);　　gendo(opr,0,2);　　gendo(sar,lev-table[i].level,table[i].adr);　　gendo(del,0,0);

102、　　getsymdo;　　}　　}　　else　　{</

103、p>　　error(27);//缺少[　　}　　}　　}　　}<

104、;p>　　}　　}　　else if(sym==dminus)//--變量　　{　　getsymdo;</p

105、>　　if(sym==ident) //后面跟的是變量　　{　　i=position(id,*ptx);　　if(i==0)　　{

106、　　error(11);　　}　　else　　{　　if(table[i].kind!=variable&&

107、amp;table[i].kind!=array) //--后沒跟變量，出錯　　{　　error(12);i=0;　　}　　else //--后跟變量，處理生成中間代碼&l

108、t;p>　　{　　if(table[i].kind==variable)//后跟變量　　{　　gendo(lod,lev-table[i].level,table[i].adr);//先取值到棧頂<p&

109、gt;　　gendo(lit,0,1); //將值為1入棧　　gendo(opr,0,3);//加法，即-1，棧頂減次棧頂　　gendo(sto,lev-table[i].level,table[i].adr);//出棧取值到內(nèi)存　　getsymdo;

110、　　}　　else if(table[i].kind==array)//后跟數(shù)組變量　　{　　getsymdo;　　if(sym==lepa

111、)　　{　　getsymdo;　　memcpy(nxtlev,fsys,sizeof(bool)* symnum);　　nxtlev[ripa]=true;

112、;　　expressiondo(nxtlev,ptx,lev);　　gendo(tra,0,table[i].size);//生成將數(shù)組下標(biāo)范圍入棧指令　　gendo(jud,0,0);//判斷下標(biāo)合法性　　if(sym!=ripa)　　{</b&

113、gt;　　error(26);//缺少]　　}　　else　　{　　gendo(gar,lev-table[i].l

114、evel,table[i].adr);　　gendo(lit,0,1);　　gendo(opr,0,3);　　gendo(sar,lev-table[i].level,table[i].adr);　　gendo(del,0,0);

115、　　getsymdo;　　}　　}　　else　　{<

116、;p>　　error(27);//缺少[　　}　　}　　}　　}<

117、b>　　}　　}　　...//此處省略部分未修改過的代碼　　}　　2．增加Pascal的FOR語句　　本次課程設(shè)計中要求擴(kuò)充的是

118、Pascal的FOR語句:　?、貴OR <變量>:=<表達(dá)式> TO <表達(dá)式> DO <語句>　　②FOR <變量>:=<表達(dá)式> DOWNTO <表達(dá)式> DO <語句>　　，流程圖如下：<

119、/b>　　1）在symbol增加字符FORSYM。　　strcpy(KWORD[10],"for"); WSYM[ 10]= forsym;　　strcpy(KWORD[22],"to"); WSYM[22]=tosym;<p&

120、gt;　　strcpy(KWORD[ 7],"downto"); WSYM[ 7]=downtosym;　　2）對statement函數(shù)進(jìn)行擴(kuò)充　　int statement(bool* fsys,int * ptx,int lev)　　{</p&

121、gt;　　...//此處省略部分未修改過的代碼　　else if(sym== forsym)　　{　　getsymdo;　　if(sym==ident) // ident為變

122、量的符號　　{　　i=position(id,*ptx);　　if(i==0)　　error(11);　　else&

123、lt;/p>　　{　　if(table[i].kind!=variable) //賦值語句中，賦值號左部標(biāo)識符屬性應(yīng)是變量　　{　　error(12);

124、;　　i=0;　　}　　else　　{　　getsymdo;

125、;　　if(sym!=becomes) 　　error(13);　　else 　　getsymdo;　　memcpy(nxtlev,fsys,sizeof(bool)*symnum); </

126、p>　　if(nxtlev[tosym]=true){} // tosym　　else nxtlev[downtosym]=true; // downtosym　　expressiondo(nxtlev,ptx,lev); //處理賦值語句右部的表達(dá)式　　gendo(sto,lev-t

127、able[i].level,table[i].adr); //保存初始值　　getsymdo;　　cx1=cx; //保存循環(huán)開始點　　memcpy(nxtlev,fsys,sizeof(bool)*symnum);　　if(sym

128、==dosym)　　{　　getsymdo;　　statement(fsys,ptx,lev); //循環(huán)體處理　　gendo(lod,lev-table[i].level,table[i].ad

129、r); //將循環(huán)變量取出放在棧頂　　gendo(opr,0,2); //循環(huán)變量加長　　gendo(sto,lev-table[i].level,table[i].adr); //將棧頂?shù)闹荡嫒胙h(huán)變量　　gendo(jmp,0,cx1);//無條件跳轉(zhuǎn)到循環(huán)開始點

130、code[cx2].a=cx; //回填循環(huán)結(jié)束點的地址　　}　　else 　　error(29); //for語句中少了do　　}&

131、lt;p>　　}　　}　　else　　error(19); //for后面為賦值語句，賦值語句左部是變量，缺少變量　　}</b&

132、gt;　　...// 此處省略部分未修改過的代碼　　}　　3．一維數(shù)組　　1）設(shè)置一維數(shù)組的左右括號：　　ssym['[']=lepa;

133、//一維數(shù)組的左括號[　　ssym[']']=ripa; //一維數(shù)組的右括號]　　2）增加指令：　　strcpy(&(mnemonic[gar][0]),"gar"); 　　strcpy(

134、&(mnemonic[sar][0]),"sar");　　strcpy(&(mnemonic[shd][0]),"shd");　　strcpy(&(mnemonic[del][0]),"del");　　strcpy(&(m

135、nemonic[jud][0]),"jud");　　strcpy(&(mnemonic[tra][0]),"tra");　　enum fct{　　lit, opr, lod, sto, cal, inte, jmp,

136、 jpc, gar, sar, shd, del, jud, tra,　　};　　由于指令有原來的8條拓展到了14條，故進(jìn)行如下修改　　#define fctnum 14　　增加的指令意義如下：

137、;　　gar：根據(jù)棧頂?shù)钠频刂窂臄?shù)組中取值到新的棧頂　　sar：根據(jù)次棧頂?shù)钠频刂钒褩ｍ數(shù)闹荡嫒霐?shù)組　　shd：將棧頂?shù)闹迪乱频酱螚ｍ?，棧頂出棧，即次棧頂成為棧?lt;/p>　　del：出棧頂　　jud：判斷數(shù)組下標(biāo)合法性

138、　　tra：將數(shù)組的下標(biāo)范圍入棧，gendo(tra,0,數(shù)組下標(biāo)最大值);　　3）增加標(biāo)識符類型屬性：　　enum object{　　constant,　　variable,

139、;　　procedur,　　array, //數(shù)組　　};　　4）在block函數(shù)中添加如下代碼：　　for(i=tx0+1;i<=tx;i+

140、+)　　{　　switch(table[i].kind)　　{　　case constant: /*常量名字*/

141、　　...//此處省略部分未修改過的代碼　　case variable: /*變量名字*/　　...//此處省略部分未修改過的代碼　　case procedur: /*過程名字*/　　...//此處省略部分未修改過的代碼<

142、;/p>　　case array://數(shù)組變量　　printf("%d var-array %s ",i,table[i].name);　　printf("lev=%d addr=%d size=%d\n",table[i].level,table[i].adr,table[i].siz

143、e);　　fprintf(fas,"%d var-array %s",i,table[i].name);　　fprintf(fas,"lev=%d addr=%d size=%d\n",table[i].level,table[i].adr,table[i].size);&

144、lt;b>　　}　　}　　}　　5)在enter（）函數(shù)添加如下代碼：　　switch(k)

145、;　　{　　case constant: /*常量名字*/　　...//此處省略部分未修改過的代碼　　case variable: /*變量名字*/

146、...//此處省略部分未修改過的代碼　　case procedur: /*過程名字*/　　...//此處省略部分未修改過的代碼　　case array: /*數(shù)組名字*/　　table[(*pt

147、x)].level=lev;　　table[(*ptx)].adr=(*pdx)-arraysize;　　table[(*ptx)].size=arraysize;　　break;　　}</

眾賞文庫> 全部分類> 畢業(yè)設(shè)計

溫馨提示

1. 本站所有資源如無特殊說明，都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
2. 本站的文檔不包含任何第三方提供的附件圖紙等，如果需要附件，請聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
3. 本站RAR壓縮包中若帶圖紙，網(wǎng)頁內(nèi)容里面會有圖紙預(yù)覽，若沒有圖紙預(yù)覽就沒有圖紙。
4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
5. 眾賞文庫僅提供信息存儲空間，僅對用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理，對用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯，并不能對任何下載內(nèi)容負(fù)責(zé)。
6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容，請與我們聯(lián)系，我們立即糾正。
7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時也不承擔(dān)用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。

編譯原理課程設(shè)計-- pl0語言的擴(kuò)充

文檔簡介

溫馨提示

最新文檔

評論

編譯原理課程設(shè)計-- pl0語言的擴(kuò)充

文檔簡介

溫馨提示

最新文檔

評論

免費下載