G: S->Ab|Ba
A->aA|a
B->a
实现对以上文法的预测分析。
#include<stdio.h>
#include<stdlib.h>
#include<string.h>
#include<dos.h>
char A[20]; /*分析栈*/
char B[20]; /*剩余串*/
char v1[20]={'a','b','#'}; /*终结符 */
char v2[20]={'S','G','A'};/*非终结符 */
int j=0,t=0,top=0,l; /*L为输入串长度 */
typedef struct type /*产生式类型定义 */
{
char origin; /*大写字符 */
char array[5]; /*产生式右边字符 */
int length;/*字符个数 */
}type;
type s,s1,s2,a1,a2; /*结构体变量 */
type C[10][10];/*预测分析表 */
/*--------------------------------*/
/*输出分析栈 */
void print()
{
int i; /*指针*/
for(i=0;i<=top+1;i++)
printf("%c",A[i]);
printf("\t\t");
}
/*--------------------------------*/
/*输出剩余串*/
void print1()
{
int j;
for(j=0;j<t;j++) /*输出对齐符*/
printf(" ");
for(j=t;j<=l;j++)
printf("%c",B[j]);
printf("\t\t\t");
}
/*--------------------------------*/
int main()
{
int m,n,k=0,flag=0,finish=0;
char ch,x;
type cha;/*用来接受C[m][n]*/
/*把文法产生式赋值结构体*/
s.origin='S'; strcpy(s.array,"aaG"); s.length=3;
s1.origin='G'; strcpy(s1.array,"Ab"); s1.length=2;
s2.origin='G'; s2.array[0]='^'; s2.length=1;
a1.origin='A'; strcpy(a1.array,"aA"); a1.length=2;
a2.origin='A'; a2.array[0]='^'; a2.length=1;
/*初始化分析表*/
for(m=0;m<=2;m++)
for(n=0;n<=2;n++)
C[m][n].origin='N';/*全部赋为空*/
/*填充分析表*/
C[0][0]=s;
C[1][0]=s1;
C[1][1]=s1;
C[1][2]=s2;
C[2][0]=a1;
C[2][1]=a2;
C[2][2]=a2;
printf("提示:本程序只能对由'a','b',构成的以'#'结束的字符串进行分析,\n");
printf("请输入要分析的字符串:");
do/*读入分析串*/
{
scanf("%c",&ch);
if ((ch!='a') &&(ch!='b')&&(ch!='#'))
{
printf("输入串中有非法字符\n");
exit(1);
}
B[j]=ch;
j++;
}while(ch!='#');
l=j; /*分析串长度*/
ch=B[0]; /*当前分析字符*/
A[top]='#'; A[++top]='S'; /*'#','S'进栈*/
printf("步骤\t\t分析栈 \t\t剩余字符 \t\t所用产生式 \n");
do
{
x=A[top--];/*x为当前栈顶字符*/
printf("%d",k++);
printf("\t\t");
for(j=0;j<=5;j++)/*判断是否为终结符*/
if(x==v1[j])
{
flag=1;
break;
}
if(flag==1)/*如果是终结符*/
{
if(x=='#')
{
finish=1; /*结束标记*/
printf("acc!\n"); /*接受 */
exit(1);
}
if(x==ch)
{
print();
print1();
printf("%c匹配\n",ch);
ch=B[++t]; /*下一个输入字符*/
flag=0; /*恢复标记*/
}
else
{ /*出错处理*/
print();
print1();
printf("%c出错\n",ch);/*输出出错终结符*/
exit(1);
}
}
else
{ /*非终结符处理*/
for(j=0;j<=4;j++)
if(x==v2[j])
{
m=j; /* m: 分析表行号*/
break;
}
for(j=0;j<=5;j++)
if(ch==v1[j])
{
n=j; /*n: 分析表列号*/
break;
}
cha=C[m][n];
if(cha.origin!='N')/*判断是否为空*/
{
print();
print1();
printf("%c-",cha.origin); /*输出产生式*/
for(j=0;j<cha.length;j++)
printf("%c",cha.array[j]);
printf("\n");
// Fanru modifed
// for(j=(cha.length-1);j=0;j--) /*产生式逆序入栈*/
for(j=(cha.length-1);j>=0;j--) /*产生式逆序入栈*/
A[++top]=cha.array[j];
if(A[top]=='^') /*为空则不进栈*/
top--;
}
else/*出错处理*/
{
print();
print1();
printf("%c出错\n",x);/*输出出错非终结符*/
exit(1);
}
}/*else*/
}while(finish==0);
}
运行结果: