编译原理实验教案

编译原理实验教案 The Standardization Office was revised on the afternoon of December 13, 2020实验教学进度表实验一 C语言子集编译程序一、实验目的用C语言对一个C语言的子集编制一个一遍扫描的编译程序，以加深对编译原理的理解，掌握编译程序的实现方法和技术。

1．设计、编制并调试一个词法分析程序，加深对词法分析原理的理解。

2．编制一个递归下降分析程序，并对C语言的简单子集进行分析。

3．通过上机实习，加深对语法制导翻译原理的理解，掌握将语法分析所识别的语法成分变换中间代码的语义翻译方法。

二、实验要求、内容及学时词法分析部分：2学时（一）待分析的C语言子集的词法：1．关键字main if else int return void while所有关键字都是小写。

2．专用符号= + - * / < <= > >= == != ; : , { } [ ] ( )3.其他标记ID和NUM通过以下正规式定义其他标记：ID→letter(letter|digit)*NUM→digit(digit)*letter→a|…|z|A|…|Z digit→0|…|94.空格由空白、制表符和换行符组成空格一般用来分隔ID、NUM、专用符号和关键字，词法分析阶段空格通常被忽略。

各种单词符号对应的类别码：（采用一符一类别码,见下表）（二）词法分析程序的功能：输入：所给文法的源程序字符串。

输出：二元组（syn,token或sum）构成的序列。

其中，syn 为单词类别码。

token 为存放的单词自身字符串。

sum 为整型常量。

具体实现时，可以将单词的二元组用结构进行处理。

例如：对源程序main(){int i=10;while(i) i=i-1;}的源文件，经词法分析后输出如下序列：(1,main) (26,() (27,)) (30,{) (2,int) (10,i) (21,=) (20,10) (34,;) (7,while) (26,() (10,i) (27,)) (10,i) (21,=) (10,i) (23,-) (20,1) (34,;) (31, })（三）词法分析程序主要算法思想：算法的基本任务是从字符串表示的源程序中识别出具有独立意义的单词符号，其基本思想是根据扫描到单词符号的第一个字符的种类，拼出相应的单词符号。

注：①关键字表初值关键字作为特殊标识符处理，把它们预先安排在一张表格中（称为关键字），当扫描程序识别出标识符时，查关键字表。

如能查到匹配的单词，则该单词为关键字，否则为一般标识符。

关键字表可处理为一个字符串数组（实际为指向字符数组的指针数组），其描述如下：char *KEY_WORDS[8]={“main”,”int”,”char”,”if”,”else”,”for”,”while”};为分析方便,这里把main作关键字处理。

②程序中需要用到的主要变量：syn,token和sum。

2．扫描子程序（scaner）的算法思想首先设置三个变量：token用来存放构成单词符号的字符串；sum 用来存放整型单词；syn用来存放单词的类别码。

扫描子程序主要部分N—语法分析部分：2学时（一）待分析的C语言子集的语法用扩充的BNF表示如下：1．<程序>→main()<语句块>2. <语句块>→’{‘<语句串>’}’3. <语句串>→<语句>{;<语句>};4. <语句>→<赋值语句>|<条件语句>|<循环语句>5. <赋值语句>→ID=<表达式>6. <条件语句>→if(<条件表达式>)<语句块>7. <循环语句>→while(<条件表达式>)<语句块>8. <条件表达式>→<表达式><关系运算符><表达式>9. <表达式>→<项>{+<项>|-<项>}10.<项>→<项>{*<因子>|/<因子>}11.<因子>→ID|NUM|(<表达式>)12.<关系运算符>→<|<=|>|>=|==|!=（二）语法分析程序的主要算法思想2．递归下降分析程序结构示意图如下：6．expression函数结构示意图如下：7．term函数结构示意图如下：函数结构示意图如下：9语义分析部分：2学时（一）实验的输入和输出输入是语法分析提供的正确的单词串，输出是四元式序列。

例如，对于语句串i=2*3+4;if(i>10) {j=3;}while(j>0) k=1;输出的四元式序列如下：1:*, 2, 3, T12:+, T1, 4, T23:=, T2, , i4:j>, i, 10, 65:j, , , 76:=, 3, , j7:j>, j, 0, 98:j, , , 119:=, 1, , k10:j, , , 7（二）算法思想1．设置语义过程①int gen(op,arg1,arg2,result)该函数是将四元式(op,arg1,arg2,result)送到四元式表中。

②char *newtemp()该函数回送一个新的临时变量名，临时变量名产生的顺序为：T1，T2，……③int merg(p1,p2)该函数将以p1和p2为头指针的两条链合并为一，合并后的链表首为返回值。

④int bp(p,t)该函数的功能是把p所链接的每个四元式的第四区段都填为t。

2．主程序示意图如下：3．函数lrparse在原来语法分析的基础上插入相应的语义动作。

将输入串翻译成四元式序列。

在实验中我们只对表达式、if语句和while语句进行翻译，其具体翻译程序见实例。

算符优先分析法部分：（选作）算符优先分析法特别有利于表达式的处理，宜于手工实现。

算符优先分析过程是自下而上的归约过程，但这种归约未必是严格的规范归约。

因此，所谓算符优先分析法就是定义算符之间的某种优先关系，并借助这种关系寻找句型的最左素短语进行归约。

算符优先分析法通常有两种：优先矩阵法和优先函数法。

前者是提供一张算符优先关系表，后者提供两个优先函数（入栈优先函数f 和比较优先函数g ），优先函数法比优先矩阵法节约存储空间，所以较为普遍。

下面介绍使用优先函数法的分析过程。

分析过程：先在算符栈置“$”，然后开始顺序扫描表达式。

若读来的单词符号是操作数，则直接进操作数栈，然后继续下一个单词符号。

分析过程从头开始，并重复进行；若读来的单词符号是运算符2θ，则将当前处于运算符栈顶的运算符1θ的入栈优先函数f 与2θ的比较优先函数g 进行比较。

1．若12()()f g θθ≤，则2θ进算符栈，并继续顺序往下扫描，分析过程重复进行。

2．若12()()f g θθ>，则产生对操作数栈顶的若干项进行1θ运算的中间代码，并从运算符栈顶移去1θ，且从操作数栈顶移去相应若干项，然后把执行1θ运算的结果压入操作数栈。

接着以运算符栈新的项与2θ进行上述比较。

3．重复步骤1，2，直到“$”和“$”配对为止。

三、实验环境DOS 或Windows 操作系统 TURBO C 或Visual C++ 四、实验参考（参考代码） #ifndef _GLOBALS_H #define _GLOBALS_H#include<> #include<> #include<>#define _SYN_MAIN 1 #define _SYN_INT 2 #define _SYN_CHAR 3 #define _SYN_IF 4 #define _SYN_ELSE 5 #define _SYN_FOR 6 #define _SYN_WHILE 7#define _SYN_ID 10 #define _SYN_NUM 20#define _SYN_ASSIGN 21 #define _SYN_PLUS 22 #define _SYN_MINUS 23 #define _SYN_TIMES 24 #define _SYN_DIVIDE 25 #define _SYN_LPAREN 26 #define _SYN_RPAREN 27 #define _SYN_LEFTBRACKET1 28 #define _SYN_RIGHTBRACKET1 29 #define _SYN_LEFTBRACKET2 30 #define _SYN_RIGHTBRACKET2 31 #define _SYN_COMMA 32 #define _SYN_COLON 33 #define _SYN_SEMICOLON 34#define _SYN_LG 35#define _SYN_LT 36#define _SYN_ME 37#define _SYN_LE 38#define _SYN_EQ 39#define _SYN_NE 40#define _SYN_END 1000#define _SYN_ERROR -1#define MAXLENGTH 255#ifndef _SEMANTEM_H#define _SEMANTEM_H/*四元组的结构*/typedef struct QUAD{char op[MAXLENGTH]; /*操作符*/char argv1[MAXLENGTH]; /*第一个操作数*/char argv2[MAXLENGTH]; /*第二个操作数*/char result[MAXLENGTH]; /*运算结果*/}QUATERNION;void lrparse(void); /*语法语义分析主函数*/#endifunion WORDCONTENT{char T1[MAXLENGTH];int T2;char T3;};typedef struct WORD{int syn;union WORDCONTENT value;}WORD;#ifndef _SCAN_H#define _SCAN_H#define _TAB_LEGNTH 4#define _KEY_WORD_END "waiting for you expanding"void Scaner(void);#endifQUATERNION *pQuad;int nSuffix,nNXQ,ntc,nfc;extern WORD uWord;extern int gnColumn,gnRow;FILE *fw;char *strFileName;char *strSource;char *Expression(void);char *Term(void);char *Factor(void);void Statement_Block(int *nChain);/*FILE *Source;*/FILE *fw;char *strSource;void Do_Tag(char *strSource);void Do_Digit(char *strSource);void Do_EndOfTag(char *strSource);void Do_EndOfDigit(char *strSource);void Do_EndOfEqual(char *strSource);void Do_EndOfPlus(char *strSource);void Do_EndOfSubtraction(char *strSource);void Do_EndOfMultiply(char *strSource); void Do_EndOfDivide(char *strSource);void Do_EndOfLParen(char *strSource);void Do_EndOfRParen(char *strSource);void Do_EndOfLeftBracket1(char *strSource);void Do_EndOfRightBracket1(char *strSource);void Do_EndOfLeftBracket2(char *strSource);void Do_EndOfRightBracket2(char *strSource);void Do_EndOfColon(char *strSource);void Do_EndOfComma(char *strSource);void Do_EndOfSemicolon(char *strSource); void Do_EndOfMore(char *strSource);void Do_EndOfLess(char *strSource);void Do_EndOfEnd(char *strSource);void PrintWord(WORD uWord);void ApartWord(char *strSource);void PrintError(int nColumn,int nRow,char chInput);void Scaner(void);int gnColumn,gnRow,gnLocate,gnLocateStart;WORD uWord;char*KEY_WORDS[20]={"main","int","char","if", "else","for","while","void",_KEY_WORD_END};int IsDigit(char chInput)p,op);sprintf(pQuad[nNXQ].argv1,argv1);sprintf(pQuad[nNXQ].argv2,argv2);sprintf(pQuad[nNXQ].result,result);nNXQ++;return;}void PrintQuaternion(void)p,pQuad[nLoop].argv1,pQuad[nLoop].argv2,pQuad[nLoop].resul t);}}char *Newtemp(void)1”2”esult)){p=atoi(pQuad[p].result);sprintf(pQuad[p].result,"%s",p1);}}return nResult;}void bp(int p,int t)esult);sprintf(pQuad[q].result,"%d",t);q=w;}return;}char *Expression(void){char *eplace=(char *)malloc(MAXLENGTH);if==_SYN_ID||==_SYN_NUM){if==_SYN_ID){sprintf(eplace,"%s", }else sprintf(eplace,"%d", Scaner();}else{Match(_SYN_LPAREN,"(");eplace=Expression();Match(_SYN_RPAREN,")");}return eplace;}void Condition(int *etc,int *efc)//处理条件表达式{char opp[3],*eplace1,*eplace2;char strTemp[4];eplace1=Expression();if<=_SYN_NE||>=_SYN_LG){switch{case _SYN_LT:case _SYN_LG:sprintf(opp,"%c",break;default:sprintf(opp,"%s",break;}Scaner();eplace2=Expression();*etc=nNXQ;*efc=nNXQ+1;sprintf(strTemp,"j%s",opp);gen(strTemp,eplace1,eplace2,"0");gen("j","","","0");//条件表达式对应的四元组第一项加标志j}else error("关系运算符");}void Statement(int *nChain)//分析赋值、if、while语句{charstrTemp[MAXLENGTH],eplace[MAXLENGTH];int nChainTemp,nWQUAD;switch{//处理赋值语句case _SYN_ID:strcpy(strTemp,Scaner();Match(_SYN_ASSIGN,"=");strcpy(eplace,Expression());Match(_SYN_SEMICOLON,";");gen("=",eplace,"",strTemp);*nChain=0;break;//处理if语句case _SYN_IF:Match(_SYN_IF,"if");Match(_SYN_LPAREN,"(");Condition(&ntc,&nfc);bp(ntc,nNXQ);Match(_SYN_RPAREN,")");Statement_Block(&nChainTemp);*nChain=merg(nChainTemp,nfc);break;//处理while语句case _SYN_WHILE:Match(_SYN_WHILE,"while");nWQUAD=nNXQ;Match(_SYN_LPAREN,"(");Condition(&ntc,&nfc);bp(ntc,nNXQ);Match(_SYN_RPAREN,")");Statement_Block(&nChainTemp);bp(nChainTemp,nWQUAD);sprintf(strTemp,"%d",nWQUAD);gen("j","","",strTemp);*nChain=nfc;break;}return;}void Statement_Sequence(int *nChain)//语句序列分析函数{Statement(nChain);while==_SYN_ID||==_SYN_IF||==_SYN_WHILE){bp(*nChain,nNXQ);Statement(nChain);}bp(*nChain,nNXQ);return;}void Statement_Block(int *nChain)//分析语句块函数，语名块是{……}语句{Match(_SYN_LEFTBRACKET2,"{");Statement_Sequence(nChain);//上行分析语句块中语句序列，即花括号中的部分Match(_SYN_RIGHTBRACKET2,"}");}void Parse(void)//语法语义分析函数{int nChain;Scaner();Match(_SYN_MAIN,"main");Match(_SYN_LPAREN,"(");Match(_SYN_RPAREN,")");Statement_Block(&nChain);if!=_SYN_END) fprintf(fw,"源程序非正常结束");PrintQuaternion();}void lrparse(void)//语法语义分析函数，主要是先处理准备和收尾工作，//中间调用parse()进行语法语义工作{pQuad=(QUATERNION*)malloc(strlen(strSource)*sizeof(QUATERN ION));nSuffix=0;nfc=ntc=nNXQ=1;fw=fopen(strFileName,"w");Parse();fclose(fw);}void main(){char str[]="main(){i=2*3+4;if(i>10) {j=3;}while (j>0) {k=1;}}";//注:上行为待编译源程序char filename[200];//以下为全局变量赋初值gnColumn=gnRow=1;gnLocate=gnLocateStart=0;nNXQ=0;strSource=str;//打开输出即单词、四元组存放的文件strcpy(filename,"d:\\c\\compiler\\");strFileName=filename;//注意只要将文件名传给strFileName，文件实际在//函数lrparse中打开。