一、实验目的：
利用C语言编制递归下降分析程序,并对简单语言进行语法分析。
编制一个递归下降分析程序,实现对词法分析程序所提供的单词序列的语法检查和结构分析。
二、实验原理
每个非终结符都对应一个子程序。
该子程序根据下一个输入符号(SELECT集)来确定按照哪一个产生式进行处理，再根据该产生式的右端:
- 每遇到一个终结符，则判断当前读入的单词是否与该终结符相匹配，若匹配，再读取下一个单词继续分析；不匹配，则进行出错处理
- 每遇到一个非终结符，则调用相应的子程序
三、实验要求说明
输入单词串，以“＃”结束，如果是文法正确的句子，则输出成功信息，打印“success”,否则输出“error”，并指出语法错误的类型及位置。
例如：
输入begin a:=9;x:=2*3;b:=a+x end #
输出success
输入x:=a+b*c end #
输出‘end' error
四、实验步骤
1．待分析的语言的语法（参考P90）
2．将其改为文法表示，至少包含
–语句
–条件
–表达式
3. 消除其左递归
4. 提取公共左因子
5. SELECT集计算
6. LL(1)文法判断
7. 递归下降分析程序
#include "wordscan.h"
void lrparser();
void yucu();
void statement();
void expression();
void term();
void factor();
int kk=0;
void lrparser() {
if (syn==1) { //begin
scaner();
yucu();
if (syn==6) { //end
scaner();
if (syn==0 && kk==0) printf("success
");
} else {
if(kk!=1) printf("error,lose 'end' !
");
kk=1;
}
} else {
printf("error,lose 'begin' !
");
kk=1;
}
return;
}
void yucu() {
statement();
while(syn==26) {
scaner();
statement();
}
return;
}
void statement() {
if (syn==10) { //为标识符
scaner();
if (syn==18) { //为 :=
scaner();
expression();
} else {
printf("error!");
kk=1;
}
} else {
printf("error!");
kk=1;
}
return;
}
void expression() {
term();
while(syn==13 || syn==14) {
scaner();
term();
}
return;
}
void term() {
factor();
while(syn==15 || syn==16) {
scaner();
factor();
}
return;
}
void factor() {
if(syn==10 || syn==11)scaner(); //为标识符或整常数时，读下一个单词符号
else if(syn==27) {
scaner();
expression();
if(syn==28)scaner();
else {
printf(" ')' 错误
");
kk=1;
}
} else {
printf("表达式错误
");
kk=1;
}
return;
}
void main() {
p=0;int i;
printf("********************语法分析程序***************
");
printf("请输入源程序:
");
do {
scanf("%c",&ch);
prog[p++]=ch;
} while(ch!='#');
p=0;
scaner();
lrparser();
printf("语法分析结束！
");
getch();
}
2.?编写扫描子程序?? wordscan.h
#include "string.h"
char prog[80],token[8];
int syn,p,m,n,sum=0;
char ch;
char *rwtab[6]= {"begin","if","then","while","do","end"};
void scaner() {
m=0;
for(n=0; n<8; n++) token[n]=NULL;
ch=prog[p++];
while(ch==' ') ch=prog[p++];
if((ch>='a' && ch<='z') ||(ch>='A' && ch<='Z')) {
while((ch>='a' && ch<='z') ||(ch>='A' && ch<='Z')||(ch>='0' && ch<='9')) {
token[m++]=ch;
ch=prog[p++];
}
token[m++]=' ';
syn=10;
p=p-1; //回退一个字符
for(n=0; n<6; n++) {
if(strcmp(token,rwtab[n])==0) {
syn=n+1;
break;
}
}
} else if(ch>='0' && ch<='9') {
sum=0;
while(ch>='0' && ch<='9') {
sum=sum*10+ch-'0';
ch=prog[p++];
}
p=p-1;
syn=11;
} else {
switch(ch) {
case '<':
m=0;
token[m++]=ch;
ch=prog[p];
if(ch=='>') {
syn=21;
token[m++]=ch;
} else if(ch=='=') {
syn=22;
token[m++]=ch;
} else {
syn=20;
p=p-1;
}
p=p+1;
token[m]=' ';
break;
case '>':
m=0;
token[m++]=ch;
ch=prog[p++];
if(ch=='=') {
syn=24;
token[m++]=ch;
} else {
syn=23;
p=p-1;
}
break;
case ':':
m=0;
token[m++]=ch;
ch=prog[p++];
if(ch=='=') {
syn=18;
token[m++]=ch;
} else {
syn=17;
p=p-1;
}
break;
case '+':
syn=13;
token[0]=ch;
break;
case '-':
syn=14;
token[0]=ch;
break;
case '*':
syn=15;
token[0]=ch;
break;
case '/':
syn=16;
token[0]=ch;
break;
case ';':
syn=26;
token[0]=ch;
break;
case '(':
syn=27;
token[0]=ch;
break;
case ')':
syn=28;
token[0]=ch;
break;
case '=':
syn=25;
token[0]=ch;
break;
case '#':
syn=0;
token[0]=ch;
break;
default:
syn=-1;
}
}