LR.rar_LR(0)_lr 0

//LR(0)分析程序 //采用Visual C++ 6.0编译器 #include "stdio.h" #include "malloc.h" #include "math.h" int AG[12][8]={{-2,-3,0,0,0,1,0,0}, {0,0,0,0,10,0,0,0}, {0,0,-4,-10,0,0,6,0}, {0,0,-5,-11,0,0,0,7}, {0,0,-4,-10,0,0,8,0}, {0,0,-5,-11,0,0,0,9}, {11,11,11,11,11,0,0,0}, {12,12,12,12,12,0,0,0}, {13,13,13,13,13,0,0,0}, {15,15,15,15,15,0,0,0}, {14,14,14,14,14,0,0,0}, {16,16,16,16,16,0,0,0}}; /*小于0为移进，大于10为归约，10为接受，0为出错，1—9为状态转移，*/ char c; int d,i,j,r; struct G { char a; struct G *next; }G,*p,*h,*temp,*top,*base; struct H { int b; struct H *next; }H,*i_temp,*i_top,*i_base; void i_push(int pint)/*定义状态栈进栈函数*/ { i_temp=malloc(sizeof(H)); i_temp->b=pint; i_temp->next=i_top; i_top=i_temp; } void i_pop(void)/*定义状态栈出栈函数*/ { if(i_top->next!=NULL) i_top=i_top->next; } void ch_push(char pchar)/*定义符号栈入栈函数*/ { temp=malloc(sizeof(G)); temp->a=pchar; temp->next=top; top=temp; } void ch_pop(void)/*定义符号栈出栈函数*/ { if(top->next!=NULL) top=top->next; } int chang(char ch) { int t; switch(ch) { case 'a':t=0;break; case 'b':t=1;break; case 'c':t=2;break; case 'd':t=3;break; case '#':t=4;break; case 'E':t=5;break; case 'A':t=6;break; case 'B':t=7;break; } return t; } void R(int t) { switch(t) { case 1:ch_push('E');break; case 2:ch_push('E');break; case 3:ch_push('A');break; case 4:ch_push('A');break; case 5:ch_push('B');break; case 6:ch_push('B'); } } void S(void) { int t; printf("\n状态栈\t符号栈\t输入串\n"); for(;;) { c=h->a; d=i_top->b; i=chang(c); t=AG[d][i]; temp=top; printf("\n"); i_temp=i_top; for(;;) { printf("%d",i_temp->b); if(i_temp->next==NULL) break; else i_temp=i_temp->next; } printf("\t"); for(;;) { printf("%c",temp->a); if(temp->a=='#') break; else temp=temp->next; } printf("\t"); temp=h; for(;;) { printf("%c",temp->a); if(temp->a=='#') break; else temp=temp->next; } printf("\t"); if(t==0)/*LR(0)分析表为0，出错*/ { r=0; break; } else/*LR(0)分析表不为0*/ { if(t<0)/*LR(0)分析表小于0，移进*/ { ch_push(c); /*符号入符号栈*/ i_push(abs(t)); /*状态栈入栈*/ h=h->next; } else/*LR(0)分析表大于0，归约*/ { if(t==10)/*LR(0)分析表等于10，接受*/ break; if(t>10) { ch_pop(); i_pop(); } else { ch_pop();ch_pop();ch_pop(); i_pop();i_pop();i_pop(); } R(t-10); j=chang(top->a); d=i_top->b; i_push(AG[d][j]);/*状态转移，状态入栈*/ } } } } void main() { char ch; printf("-------------LR(0)文法---------------\n"); printf(" (1)E -> aA \n (2)E -> bB\n (3)A -> cA\n (4)A -> d\n (5)B -> cB\n (6)B -> d\n"); printf("请输入分析串:\n"); base=malloc(sizeof(G)); base->next=NULL; base->a='#'; /*输入待判断的字符串，以'#'结束*/ top=base; i_base=malloc(sizeof(H)); i_base->b=0; i_base->next=NULL; i_top=i_base; h=malloc(sizeof(G)); h->next=NULL; p=h; do{ ch=getch(); putch(ch); if(ch=='a'||ch=='b'||ch=='c'||ch=='d'||ch=='#') { temp=malloc(sizeof(G)); temp->next=NULL; temp->a=ch; h->next=temp; h=h->next; } else/*如果输入了不是该文法的字符串*/ { temp=p->next; printf("\n你输入的是错误字符!请重新输入:\n"); for(;;) { if (temp!=NULL) printf("%c",temp->a); else break; temp=temp->next; } } }while(ch!='#'); p=p->next; h=p; r=1; S(); if(r) printf("\nOK!\n"); else printf("\nError!\n"); getch(); }