编译原理 语法分析.doc

编译原理 语法分析 源程序： #include stdio.h #include stdlib.h #include string.h #define _KEY_WORD_END waiting for your expanding ///////////////////////////////////// void Irparser(); void statement(); void expression(); void term(); void factor(); void yucu(); void nextWord(); static int syn=1,kk=0; static int line=1; /////////////////////////////////////////////实验一 typedef struct { int typenum; char* word; }WORD; char input[255]; char token[255]=; int p_input; int p_token; char ch; char* rwtab[]={begin,if,then,while,do,end,_KEY_WORD_END}; WORD* scaner(); WORD* oneword=new WORD; char m_getch() { ch=input[p_input]; p_input++; return (ch); } void getbc() { if(ch==\n) { line++; } while(ch== ||ch==10) { ch=input[p_input]; p_input++; } } void concat() { token[p_token]=ch; p_token++; token[p_token]=\0; } int letter() { if(ch=ach=z || ch=Ach=Z) return 1; else return 0; } int digit() { if(ch=0ch=9) return 1; else return 0; } /* 检索关键字表格 */ int reserve() { int i=0; while(strcmp(rwtab[i],_KEY_WORD_END)) { if(!strcmp(rwtab[i],token)) return i+1; i++; } return 10; } /* 回退一个字符 */ void retract() { p_input--; } /* 数字转换成二进制，读者自己补全？ */ char* dtb() { return NULL; } WORD* scaner() { WORD* myword = new WORD; myword-typenum=10; myword-word=; p_token=0; m_getch(); getbc(); // 注释 if(ch==/) { char ch=m_getch(),ch0=\0; if(ch==/) // 单行注释 { while(ch!=\n) ch=m_getch(); myword-typenum=999; myword-word=ZhuShi; line++; return (myword); } else { retract(); retract(); char ch=m_getch(),ch0=\0; } } /* 注释 */ if(letter()) { while(letter()||digit()) { concat(); m_getch(); } retract(); myword-typenum=reserve(); myword-word=token; return (myword); } else if(digit()) { while(digit()) { concat(); m_getch(); } retract(); myword-typenum=20; myword-word=token; return (myword); } else switch(ch) { case =: m_getch(); if(ch===) { myword-typenu