编译程序语法分析.pptVIP

*lev:当前分程序所在层 *tx:名字表当前尾指针 *fsys:当前模块后跟符号集合 */ int block(int lev,int tx,bool* fsys){ int i; int dx; /*名字分配到的相对地址*/ int tx0; /*保留初始tx*/ int cx0; /*保留初始cx*/ bool nxtlev[symnum]; dx=3; tx0=tx; /*记录本层名字的初始位置*/ table[tx].adr=cx; gendo(jmp,0,0); if(lev levmax) { error(32); } do{ if(sym==constsym) /*收到常量声明符号，开始处理常量声明*/ { getsymdo; do{ constdeclarationdo(tx,lev,dx); /*dx的值会被constdeclaration改变，使用指针*/ while(sym==comma) { getsymdo; constdeclarationdo(tx,lev,dx); } if(sym==semicolon) { getsymdo; } else { error(5); /*漏掉了逗号或者分号*/ } }while(sym==ident); } if(sym==varsym)/*收到变量声名符号，开始处理变量声名*/ { getsymdo; do{ vardeclarationdo(tx,lev,dx); while(sym==comma) { getsymdo; vardeclarationdo(tx,lev,dx); } if(sym==semicolon) { getsymdo; } else { error(5); } }while(sym==ident); } /* *常量声明处理 */ int constdeclaration(int * ptx,int lev,int * pdx) { if(sym==ident) { getsymdo; if(sym==eql ||sym==becomes) { if(sym==becomes) { error(1); /*把=写出成了：=*/ } getsymdo; if(sym==number) { enter(constant,ptx,lev,pdx); getsymdo; } else { error(2); /*常量说明=后应是数字*/ } } else { error(3); /*常量说明标识后应是=*/ } } else { error(4); /*const后应是标识*/ } return 0; } int vardeclaration(int * ptx,int lev,int * pdx) { if(sym==ident) { enter(variable,ptx,lev,pdx);//填写名字表 getsymdo; } else { error(4); } return 0; } /* *输入目标代码清单 */ void listcode(int cx0) { int i; if (listswitch) { for(i=cx0;icx;i++) { printf(%d %s %d %d\n,i,mnemonic[code[i].f],code[i].l,code[i].a); fprintf(fa,%d %s %d %d\n,i,mnemonic[code[i].f],code[i].l,code[i].a); } } } /* *语句处理 */ int statement(bool* fsys,int * ptx,int lev) { int i,cx1,cx2; bool nxtlev[symnum]; if(sym==ident) /*准备按照赋值语句处理*/ { i=position(id,*ptx); if(i==0) { error(11); /*变量未找到*/ } else { if(table[i].kind!=variable) { error(12); /*赋值语句格式错误*/ i=0; } else { getsymdo; if(sym==becomes) { getsymdo; } else { error(13); /*没有检测到赋值语句*/ } memcpy(nxtlev,fsys,sizeof(bool)* symnum); expressiondo(nxtlev,ptx,lev); /*处理赋值符号右侧表达式*/ if(i!=0) { gendo(sto,lev-table[i].level,table[i].adr); /*expression将执行一系列